(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 12.1' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[    122381,       2326]
NotebookOptionsPosition[    120250,       2282]
NotebookOutlinePosition[    120761,       2301]
CellTagsIndexPosition[    120718,       2298]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell[BoxData[
 RowBox[{"\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"Sig", "[", 
      RowBox[{"gamma_", ",", "x_"}], "]"}], ":=", 
     RowBox[{"(", 
      RowBox[{"1", "/", 
       RowBox[{"(", 
        RowBox[{"1", "+", 
         RowBox[{"Exp", "[", 
          RowBox[{
           RowBox[{"-", "gamma"}], "*", "x"}], "]"}]}], ")"}]}], ")"}]}], 
    ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"thetaxFOVdeg", "=", "80"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"thetayFOVdeg", "=", "80"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"thetaxFOVrad", "=", 
     RowBox[{"thetaxFOVdeg", "*", 
      RowBox[{"3.14", "/", "180"}]}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"thetayFOVrad", "=", 
     RowBox[{"thetayFOVdeg", "*", 
      RowBox[{"3.14", "/", "180"}]}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"thetaxhalfFOVrad", "=", 
     RowBox[{"thetaxFOVrad", "/", "2.0"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"thetayhalfFOVrad", "=", 
     RowBox[{"thetayFOVrad", "/", "2.0"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"tthx", "=", 
     RowBox[{"Tan", "[", "thetaxhalfFOVrad", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"tthy", "=", 
     RowBox[{"Tan", "[", "thetayhalfFOVrad", "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"tthx2", "=", 
     RowBox[{"tthx", "^", "2"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"tthy2", "=", 
     RowBox[{"tthy", "^", "2"}]}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"ss", "=", "1.0"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Gam1", "=", "0.6"}], ";", 
    RowBox[{"Gam2", "=", "4"}], ";", 
    RowBox[{"Gam3", "=", "100"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"v1h", "=", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", "tthx"}], ",", 
       RowBox[{"-", " ", "tthy"}], ",", "1", ",", "1"}], "}"}]}], ";", 
    RowBox[{"(*", 
     RowBox[{
     "Homogenous", " ", "coordinate", " ", "of", " ", "the", " ", "point", 
      " ", "v1"}], "*)"}], "\[IndentingNewLine]", 
    RowBox[{"v2h", "=", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", "tthx"}], ",", " ", "tthy", ",", "1", ",", "1"}], "}"}]}],
     ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"v3h", "=", 
     RowBox[{"{", 
      RowBox[{"tthx", ",", " ", "tthy", ",", "1", ",", "1"}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"v4h", "=", 
     RowBox[{"{", 
      RowBox[{"tthx", ",", " ", 
       RowBox[{"-", "tthy"}], ",", "1", ",", "1"}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"xyzh", "=", 
     RowBox[{"{", 
      RowBox[{"x", ",", "y", ",", "z", ",", "1"}], "}"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"v0h", "=", 
     RowBox[{"{", 
      RowBox[{"0", " ", ",", "0", ",", "0", ",", "1"}], "}"}]}], ";"}], " ", 
   RowBox[{"(*", 
    RowBox[{
    "Homogenous", " ", "coordinate", " ", "of", " ", "the", " ", "origin", 
     " ", "of", " ", "the", " ", "cone"}], "*)"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"{", 
      RowBox[{"xyz", ",", "v0h", ",", "v2h", ",", "v1h"}], "}"}], "//", 
     "MatrixForm"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"dA21", "=", 
     RowBox[{"Det", "[", 
      RowBox[{"{", 
       RowBox[{"xyzh", ",", "v0h", ",", "v2h", ",", "v1h"}], "}"}], "]"}]}], 
    ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"dA32", "=", 
     RowBox[{"Det", "[", 
      RowBox[{"{", 
       RowBox[{"xyzh", ",", "v0h", ",", "v3h", ",", "v2h"}], "}"}], "]"}]}], 
    ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"dA43", "=", 
     RowBox[{"Det", "[", 
      RowBox[{"{", 
       RowBox[{"xyzh", ",", "v0h", ",", "v4h", ",", "v3h"}], "}"}], "]"}]}], 
    ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"dA14", "=", 
     RowBox[{"Det", "[", 
      RowBox[{"{", 
       RowBox[{"xyzh", ",", "v0h", ",", "v1h", ",", "v4h"}], "}"}], "]"}]}], 
    ";"}], "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{
     "Note", " ", "that", " ", "increasing", " ", "the", " ", "even", " ", 
      "exponents"}], ",", " ", 
     RowBox[{
     "you", " ", "get", " ", "the", " ", "shape", " ", "closer", " ", "to", 
      " ", "the", " ", "one", " ", "of", " ", "a", " ", "square"}]}], "*)"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"isInFOV1", "=", 
     RowBox[{"-", 
      RowBox[{"(", 
       RowBox[{
        RowBox[{
         RowBox[{"(", 
          RowBox[{"x", "^", "4"}], ")"}], "/", "tthx2"}], "  ", "+", " ", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{"y", "^", "4"}], ")"}], "/", "tthy2"}], " ", "-", 
        RowBox[{"(", 
         RowBox[{"z", "^", "4"}], ")"}]}], ")"}]}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"isInFOV2", "=", "z"}], ";"}], "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"RegionPlot3D", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"isInFOV1", "\[GreaterEqual]", "0"}], "&&", " ", 
       RowBox[{"isInFOV2", "\[GreaterEqual]", "0"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"x", ",", 
        RowBox[{"-", "20"}], ",", "20"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"y", ",", 
        RowBox[{"-", "20"}], ",", "20"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"z", ",", "0.001", ",", "20"}], "}"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", " ", 
       RowBox[{"{", 
        RowBox[{"x", ",", "y", ",", "z"}], "}"}]}], ",", 
      RowBox[{"BoxRatios", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"1", ",", "1", ",", "0.5"}], "}"}]}]}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"RegionPlot3D", "[", 
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{"Sig", "[", 
         RowBox[{"Gam1", ",", "isInFOV1"}], "]"}], "*", 
        RowBox[{"Sig", "[", 
         RowBox[{"Gam2", ",", "isInFOV2"}], "]"}]}], "\[GreaterEqual]", 
       "0.95"}], ",", 
      RowBox[{"{", 
       RowBox[{"x", ",", 
        RowBox[{"-", "20"}], ",", "20"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"y", ",", 
        RowBox[{"-", "20"}], ",", "20"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"z", ",", "0.001", ",", "20"}], "}"}], ",", 
      RowBox[{"BoxRatios", "\[Rule]", 
       RowBox[{"{", 
        RowBox[{"1", ",", "1", ",", "0.5"}], "}"}]}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", " ", 
       RowBox[{"{", 
        RowBox[{"x", ",", "y", ",", "z"}], "}"}]}]}], "]"}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"ConePlanes", "=", 
     RowBox[{"RegionPlot3D", "[", 
      RowBox[{
       RowBox[{
        RowBox[{"dA21", "\[GreaterEqual]", "0"}], "&&", " ", 
        RowBox[{"dA32", "\[GreaterEqual]", "0"}], "&&", 
        RowBox[{"dA43", "\[GreaterEqual]", "0"}], "&&", " ", 
        RowBox[{"dA14", "\[GreaterEqual]", "0"}]}], ",", " ", 
       RowBox[{"{", 
        RowBox[{"x", ",", 
         RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"y", ",", 
         RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{"z", ",", "0.001", ",", "1"}], "}"}], ",", 
       RowBox[{"AxesLabel", "\[Rule]", " ", 
        RowBox[{"{", 
         RowBox[{"x", ",", "y", ",", "z"}], "}"}]}]}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", 
   RowBox[{"ConePlanes", "=", 
    RowBox[{"RegionPlot3D", "[", 
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{"Sig", "[", 
         RowBox[{"Gam3", ",", "dA21"}], "]"}], "*", 
        RowBox[{"Sig", "[", 
         RowBox[{"Gam3", ",", "dA32"}], "]"}], "*", 
        RowBox[{"Sig", "[", 
         RowBox[{"Gam3", ",", "dA43"}], "]"}], "*", 
        RowBox[{"Sig", "[", 
         RowBox[{"Gam3", ",", "dA14"}], "]"}]}], ">=", "0.9"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"x", ",", 
        RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"y", ",", 
        RowBox[{"-", "2"}], ",", "2"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"z", ",", "0.001", ",", "1"}], "}"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", " ", 
       RowBox[{"{", 
        RowBox[{"x", ",", "y", ",", "z"}], "}"}]}]}], "]"}]}], 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"ch", "=", 
     RowBox[{"ConvexHullMesh", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"v0h", "[", 
         RowBox[{"[", 
          RowBox[{"1", ";;", "3"}], "]"}], "]"}], ",", 
        RowBox[{"v1h", "[", 
         RowBox[{"[", 
          RowBox[{"1", ";;", "3"}], "]"}], "]"}], ",", 
        RowBox[{"v2h", "[", 
         RowBox[{"[", 
          RowBox[{"1", ";;", "3"}], "]"}], "]"}], ",", 
        RowBox[{"v3h", "[", 
         RowBox[{"[", 
          RowBox[{"1", ";;", "3"}], "]"}], "]"}], ",", 
        RowBox[{"v4h", "[", 
         RowBox[{"[", 
          RowBox[{"1", ";;", "3"}], "]"}], "]"}]}], "}"}], "]"}]}], ";"}], 
   "\[IndentingNewLine]", "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{
     RowBox[{
     "The", " ", "command", " ", "above", " ", "may", " ", "give", " ", "the",
       " ", "warning", " ", "\"\< too small to represent as a norm...\>\""}], 
     ",", " ", 
     RowBox[{"but", " ", 
      RowBox[{"it", "'"}], "s", " ", "ok"}], ",", " ", 
     RowBox[{"the", " ", "plot", " ", "is", " ", 
      RowBox[{"right", ".", " ", "You"}], " ", "can", " ", "also", " ", "use",
       " ", 
      RowBox[{"LogisticSigmoid", "[", "]"}], " ", "and", " ", "the", " ", 
      "error", " ", "goes", " ", "away"}]}], "*)"}], "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"RegionPlot3D", "[", 
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{"-", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{
            RowBox[{"(", 
             RowBox[{"x", "^", "4"}], ")"}], "/", "tthx2"}], "  ", "+", " ", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{"y", "^", "4"}], ")"}], "/", "tthy2"}], " ", "-", 
           RowBox[{"(", 
            RowBox[{"z", "^", "4"}], ")"}]}], ")"}]}], "\[GreaterEqual]", 
        "0"}], "&&", " ", 
       RowBox[{"z", "\[GreaterEqual]", "0"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"x", ",", 
        RowBox[{"-", "20"}], ",", "20"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"y", ",", 
        RowBox[{"-", "20"}], ",", "20"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"z", ",", "0.001", ",", "20"}], "}"}], ",", 
      RowBox[{"AxesLabel", "\[Rule]", " ", 
       RowBox[{"{", 
        RowBox[{"x", ",", "y", ",", "z"}], "}"}]}]}], "]"}], "*)"}], 
   "\[IndentingNewLine]", 
   RowBox[{"(*", 
    RowBox[{"RegionPlot3D", "[", 
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{"-", 
         RowBox[{"(", 
          RowBox[{
           RowBox[{
            RowBox[{"(", 
             RowBox[{"x", "^", "2"}], ")"}], "*", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{"z", "^", "2"}], ")"}], "/", "tthx2"}]}], "  ", "+", 
           " ", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{"y", "^", "2"}], ")"}], "*", 
            RowBox[{
             RowBox[{"(", 
              RowBox[{"z", "^", "2"}], ")"}], "/", "tthy2"}]}], " ", "-", 
           RowBox[{
            RowBox[{"(", 
             RowBox[{"ss", "^", "2"}], ")"}], "*", 
            RowBox[{"(", 
             RowBox[{"x", "^", "2"}], ")"}], "*", 
            RowBox[{"(", 
             RowBox[{"y", "^", "2"}], ")"}]}], " ", "-", " ", 
           RowBox[{"z", "^", "4"}]}], ")"}]}], "\[GreaterEqual]", "0"}], "&&",
        " ", 
       RowBox[{"z", "\[GreaterEqual]", "0"}]}], ",", 
      RowBox[{"{", 
       RowBox[{"x", ",", 
        RowBox[{"-", "20"}], ",", "20"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"y", ",", 
        RowBox[{"-", "20"}], ",", "20"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{"z", ",", "0.0001", ",", "20"}], "}"}]}], "]"}], 
    "*)"}]}]}]], "Input",
 CellChangeTimes->CompressedData["
1:eJwdzltIUwEcBvBxxBzYRUQ0hC5jGws9nWI6RAzpmBubKIwxBxPDNAMZytza
5h7aYKvIDtpGLZh4HUktxLysVqmMMgUjSxgyH7ZEYqwtpvgiFVl0vvPw5/fw
8X38BR1GzQ2Cx+OJ2YOkJr63aM3SRPtYwRIrRfwrhR0FGiHs+vKhHK7LP1Hw
FhNqgOL1QBOUKqtaIFM7zlkrOt8FizKkBeY7HD6YvnjhCdf3TgWhVj/4Cjau
jS7Be5XGCCzOuBpWWevrcpuhzvmnDc4kNGb4dDLmggfe77ehLREfgGdXqh7A
xW+iYSgijgdg+NT7aVhMuWeh85qiyW9jc61ECylbZyyvL0uTu+lteL/kWQpG
NkZ/w6QpzOeztja/PAYvRw2F8NHfSjHUjh0tg5G7dgpubfyogKeTbhnkmz/W
QHLkLQ11/qACPpSeVEG7zKWGE+Flzl9lKQO3R/b3QJP1yB34UzXJaXj81QMD
Zyw+uNAqHoaz1+NB7j/6+TQUFp4IwVK55A1cadt8B4lL51ah/2pOFPbOH8Zg
bnYoA+cOpcp8VuW8QgUZwQs1XHt9Uw87u3ccMB264oT70c8MnLJXe+B/Ylwh
ag==
  "],
 CellLabel->
  "In[1493]:=",ExpressionUUID->"19ed53eb-667e-4297-9a38-e410cac1ad2b"],

Cell[BoxData[
 TemplateBox[{
  "General", "munfl", 
   "\"\\!\\(\\*RowBox[{\\\"0.5009999986666688`\\\", \\\" \\\", \
\\\"3.21747779202555026938`10.518291250918958*^-118600\\\"}]\\) is too small \
to represent as a normalized machine number; precision may be lost.\"", 2, 
   1519, 262, 27938764878589576465, "Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{{3.81984228312807*^9, 3.8198423112056293`*^9}, {
   3.819842362647395*^9, 3.819842450854303*^9}, {3.819842577672585*^9, 
   3.8198425914901533`*^9}, {3.819842667318269*^9, 3.819842673951165*^9}, {
   3.8198427774761257`*^9, 3.819842824774077*^9}, {3.820274282935285*^9, 
   3.820274338275024*^9}, {3.8205031711314697`*^9, 3.8205032041591063`*^9}, 
   3.820503261181653*^9, 3.820503338030066*^9, {3.8205034038946867`*^9, 
   3.820503412079797*^9}, {3.820503456145944*^9, 3.820503468518889*^9}, 
   3.820503625631137*^9, 3.820503686732974*^9, 3.8205041015201797`*^9, {
   3.8205041931226187`*^9, 3.820504228205249*^9}, {3.820504287290062*^9, 
   3.8205043911368923`*^9}, {3.8205044381335373`*^9, 
   3.8205044728770447`*^9}, {3.820504636724428*^9, 3.820504665771316*^9}, 
   3.820504760953246*^9, {3.820504809313304*^9, 3.820504831890253*^9}, {
   3.820504869412219*^9, 3.820504909093398*^9}, {3.820509762258217*^9, 
   3.820509770810708*^9}, {3.820509833736389*^9, 3.820509899963407*^9}, 
   3.820510720184931*^9},
 CellLabel->
  "During evaluation of \
In[1493]:=",ExpressionUUID->"2f26c32a-f341-45ea-b92f-60786a68c795"],

Cell[BoxData[
 TemplateBox[{
  "General", "munfl", 
   "\"\\!\\(\\*RowBox[{\\\"0.5009999986666688`\\\", \\\" \\\", \
\\\"3.21747779202555026938`10.518291250918958*^-118600\\\"}]\\) is too small \
to represent as a normalized machine number; precision may be lost.\"", 2, 
   1519, 263, 27938764878589576465, "Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{{3.81984228312807*^9, 3.8198423112056293`*^9}, {
   3.819842362647395*^9, 3.819842450854303*^9}, {3.819842577672585*^9, 
   3.8198425914901533`*^9}, {3.819842667318269*^9, 3.819842673951165*^9}, {
   3.8198427774761257`*^9, 3.819842824774077*^9}, {3.820274282935285*^9, 
   3.820274338275024*^9}, {3.8205031711314697`*^9, 3.8205032041591063`*^9}, 
   3.820503261181653*^9, 3.820503338030066*^9, {3.8205034038946867`*^9, 
   3.820503412079797*^9}, {3.820503456145944*^9, 3.820503468518889*^9}, 
   3.820503625631137*^9, 3.820503686732974*^9, 3.8205041015201797`*^9, {
   3.8205041931226187`*^9, 3.820504228205249*^9}, {3.820504287290062*^9, 
   3.8205043911368923`*^9}, {3.8205044381335373`*^9, 
   3.8205044728770447`*^9}, {3.820504636724428*^9, 3.820504665771316*^9}, 
   3.820504760953246*^9, {3.820504809313304*^9, 3.820504831890253*^9}, {
   3.820504869412219*^9, 3.820504909093398*^9}, {3.820509762258217*^9, 
   3.820509770810708*^9}, {3.820509833736389*^9, 3.820509899963407*^9}, 
   3.820510720190427*^9},
 CellLabel->
  "During evaluation of \
In[1493]:=",ExpressionUUID->"c113824b-c5a6-4d56-8789-e7fdf423ef6f"],

Cell[BoxData[
 TemplateBox[{
  "General", "munfl", 
   "\"\\!\\(\\*RowBox[{\\\"0.996724487353561`\\\", \\\" \\\", \
\\\"3.941159868332917880815`10.518295235426477*^-118599\\\"}]\\) is too small \
to represent as a normalized machine number; precision may be lost.\"", 2, 
   1519, 264, 27938764878589576465, "Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{{3.81984228312807*^9, 3.8198423112056293`*^9}, {
   3.819842362647395*^9, 3.819842450854303*^9}, {3.819842577672585*^9, 
   3.8198425914901533`*^9}, {3.819842667318269*^9, 3.819842673951165*^9}, {
   3.8198427774761257`*^9, 3.819842824774077*^9}, {3.820274282935285*^9, 
   3.820274338275024*^9}, {3.8205031711314697`*^9, 3.8205032041591063`*^9}, 
   3.820503261181653*^9, 3.820503338030066*^9, {3.8205034038946867`*^9, 
   3.820503412079797*^9}, {3.820503456145944*^9, 3.820503468518889*^9}, 
   3.820503625631137*^9, 3.820503686732974*^9, 3.8205041015201797`*^9, {
   3.8205041931226187`*^9, 3.820504228205249*^9}, {3.820504287290062*^9, 
   3.8205043911368923`*^9}, {3.8205044381335373`*^9, 
   3.8205044728770447`*^9}, {3.820504636724428*^9, 3.820504665771316*^9}, 
   3.820504760953246*^9, {3.820504809313304*^9, 3.820504831890253*^9}, {
   3.820504869412219*^9, 3.820504909093398*^9}, {3.820509762258217*^9, 
   3.820509770810708*^9}, {3.820509833736389*^9, 3.820509899963407*^9}, 
   3.820510720193242*^9},
 CellLabel->
  "During evaluation of \
In[1493]:=",ExpressionUUID->"9d4a3a37-b45a-4db5-99de-98e54e0368e9"],

Cell[BoxData[
 TemplateBox[{
  "General", "stop", 
   "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"General\\\", \
\\\"::\\\", \\\"munfl\\\"}], \\\"MessageName\\\"]\\) will be suppressed \
during this calculation.\"", 2, 1519, 265, 27938764878589576465, "Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{{3.81984228312807*^9, 3.8198423112056293`*^9}, {
   3.819842362647395*^9, 3.819842450854303*^9}, {3.819842577672585*^9, 
   3.8198425914901533`*^9}, {3.819842667318269*^9, 3.819842673951165*^9}, {
   3.8198427774761257`*^9, 3.819842824774077*^9}, {3.820274282935285*^9, 
   3.820274338275024*^9}, {3.8205031711314697`*^9, 3.8205032041591063`*^9}, 
   3.820503261181653*^9, 3.820503338030066*^9, {3.8205034038946867`*^9, 
   3.820503412079797*^9}, {3.820503456145944*^9, 3.820503468518889*^9}, 
   3.820503625631137*^9, 3.820503686732974*^9, 3.8205041015201797`*^9, {
   3.8205041931226187`*^9, 3.820504228205249*^9}, {3.820504287290062*^9, 
   3.8205043911368923`*^9}, {3.8205044381335373`*^9, 
   3.8205044728770447`*^9}, {3.820504636724428*^9, 3.820504665771316*^9}, 
   3.820504760953246*^9, {3.820504809313304*^9, 3.820504831890253*^9}, {
   3.820504869412219*^9, 3.820504909093398*^9}, {3.820509762258217*^9, 
   3.820509770810708*^9}, {3.820509833736389*^9, 3.820509899963407*^9}, 
   3.820510720196162*^9},
 CellLabel->
  "During evaluation of \
In[1493]:=",ExpressionUUID->"a3827fe1-6c3f-4df7-9bb9-4dc9a234a4b4"],

Cell[BoxData[
 Graphics3DBox[{GraphicsComplex3DBox[CompressedData["
1:eJytnXn0HUWVx38CoiIcFGQRkIEEEZF9EZcZGzzDFhUkIogILgNHBJKwjjow
IDjIICOQIKiAwiiIEAYBJWyNzzCRQTahSUJCgISXhYAyMuogIMu897o/1VWf
7p4zzAl/+PN93823bt2qunXr1u1+m35hysTDVxobG/vuG8fGVh78/fZme0/b
bO9+b8Lgf6fl/d7n55+9bNZjyzI+8z04n/k7+ytPbX7sV2p88+Gfq5f03rR4
+TWf2PypjM98D87nR2dMWjDjgmW963+3+/H9yb/N+Mz34Hw+ZsFA4JTlvU89
98P3H3vTMxmf+R480efIp3tjo/+ezfjM9+DuV4LPBC867FD0lh6w+wuz9lmm
/hahv2m/itCvVP8i6J/qWXToWTT0HKv+s57g1hPceoJbT3DrOZb892yjXet5
Xql/Zj3BrSe49QS3nuDWE9x6Gmf+l3i/Q89+xvxP9ex36Nnv0LPfoWe/Q88m
vkepb0PPcaVemdfdvFKvzOvr6FKvzOtoXKmX2i3CemG8Enym/UbR8A/g9gPg
Xu8JT7SurY/xoc8b225u7xuHb3vR2l9ekPGZ78FTnqL3/Dd/+vxq4x9O9Vn1
kd6R+Qnnr7/KoozPfA/O5wuHf+c/1lvrzgcPuvKj/YzPfA+e6DlvUe/W32yz
yXsvWJLxme/Braf7e+vAnJOmP9h778QT13hu6dxyHh5ShPUInv77wX6w/ioH
nHP/3GAfcOxDf8HpL/0Cp1/oD2792/1G0ZtR6p+hJ/qwTj1e4IwXeoJbT3Dr
CW492/1G0Xvl1cF/285t6HNk2X7m+XBO2X7mcR/xPLyoo91+5vXV7gcqfKb9
QNHhB4oOP1B0+IGi4QfCvJEfSPDID4DbD4DbD4DbDyQ8kR+wPsZZB8wr1gn9
A095BuusWhfg9ieJnpF/ALcfSHii9e52rf8tQ30P/klv6do7HfnqGTdkfOZ7
8DH9179+0dguh12U6vn3t/WmbnfO/R84/I6Mz3wPzucLhvp86Ve97Q5cafmJ
Z96T8Znvwfm8cGjnNe7rPfmh2742b/8i4zPfg1tP9/fnZf8y9+vIUt/Mep5b
6pVZn/ll+xntMu6sa487uMfdfgB8XjmvGjz2D4n+kX8At39IeCL/kOpT+wfj
1tP+Adz+IelX5B/A7R8Snsg/BDvKPyR45B/A7R/A7R/A7R8Snsg/WB9w9hv7
gVS+jgfA7QcSfSI/AG4/kPBEfsDtoifrAXuzLlgP4KwL1gM464L1AM66SOd3
HQ+EfVFxheVtT68vPnt/B/c+btzj6PUV9nutL3Cvr4QnWl9pu/X6Mm59vL7A
vb7Avb7Avb4Snsb66of5zHkE3Od68Pb11e9YX/2O9dXvWF/9xvpinBxvM06O
nxknx8mMk+PhtN1CfqbfWEf4a2Ys8xA9wa0nuPUEt57g1jOsX+npdYQ+jnvR
x/Et+ji+RR/Ht7Trc7dxj6/Pv8Yt7/MpePu66Hesi37Huug31gXtOX9Fe85H
0Z7zTrTn/BLteZ6z/p0vStstOtotOtotOtotGu0yc9wuuNsFd7vgbtfzk3ad
z6Fd521o13kb2nXehnY9Dxlf52fSdvsd7fY72u13tNvMt3TlH7rOI11xSJf/
NN4137rmQ9d4ddmzq79d66trP6KlrnxRO97ML3XlwbryeF15yK58b1d+9fHh
PPnN4jIfNX5xWKfg8My6Yb37zhq/PODD6bjZmkvD+h3Fc+94ssznTF8c1i/y
o/afXxZw5OG/epfPTDz3Lb8L+M3DeOnCpe16Ll4ecPNY/n/Hi94nptx8+cab
LhdP0dCny25dOCNifnDzexzNY5z5YH5w83v+mKcd72eMe8rT7+Dvd/IYn1fO
t8zz7ZxyXmWeV6P9/OrFmefVuHJeZZ5XPy/nT3u7i5cHfBTfn75oOD8vP/H2
et98z2i9PNL7yODPRr0a7494HupNWTDjmTt+WePwMN/uPeu273zqmJoH/IML
953zkc/XPGH+77RkrWzislifJF6Fxzg8xuFxfAuPcXiMw+N4GB7j8BhP+hX5
+aRfEZ70K8JtZ/MYt52Nj+bJVbNDfJ7KF71/2mDL5R+bPS/go/n2tXkhbqfd
4fR89aY5IW5Hfq+ho5z4aMBTPYveslfysdOzRaFfI/hPdZyP/PDrBefMDzj8
Q3jG2+pzdGqfonfIWdscd/S2TbzdbkWH3Zo4HmnTSTv8eNxl8wIPuPsFbn3s
38zT1a5x/BjjBQ+49QG3PvaH5ulq1/h15bzKPK82KudP5vnzYjl/Ms+fXcv5
E3D03KScJ5nnyRfLeZJ5njxczpPM8wT/bH8Fbn8V/L/8lf28edrt1m/44XGl
H87sh/cs/XBmP3xU6Ycz+2Gfs+AxnqzrCIfH5zJ4jMNjHB6f4+AxDo/xpF9R
3Jj0K8KTfkX4DqPPdzfuK3cd4bc28PLf5bnxhCfKcyY8jfuRiifC4fH+BU/7
vUmeG4fH+xc87fcseW4cHu9f8LTfy+S58aRf0f6V9Ktxbqr6FeG2s3na731q
O5snP/SO4w7Yp873wnPvautfueoBvg+q7BPdH6X6FL2v/NXOL62+aK70KXqr
XrLRVR97eK70qe+V4HE+GZ72+6Y8N56MV5R/TsarcT9VjVeEw+N8NTzt91l5
bjzpV5TfTvrVuP+q+hXhtnP7uPu+rLaz8dN0jwY+Vv338RvK+zL4x8YP/s+v
j+ml9015vr/u0YJ89d/Z39ljYW/WzIA/PdzXvnhdL72fyvMzh3pG92v094ih
nhteEO7R4DllKH99r5feo+X5g7p3gwd9jn/06Qm7zXyggduexm0f4yfrng6e
l8aN7JbZbvvo/g75paV9MtvntNI+me1zWGmfzPb5cmmfzPa5R/eA8BC3eP2C
e/36ftA8tmf7vWHNAw7PzaVfyuyX7ir9Uma/5PtHeHw/Ak/7vWSeG4fH9ynw
tN9j5rlxeHz/Ak/7vWeeG0/6Fd3XJP1q3JNW/YrwdLzq+510vHyvynjVuHna
x933sDWPx933RwlP49624olweBy/wdN+z5vnxuFx/AZP+71wNQ8jHB7Hb/C0
3yPnufGkX1H8lvSrkYes+hXhbyzlG/fO65b8DTyRj+K0RD7CkXc8hrxx5B13
IW8cecdXyBtP9IniqESfCHd/LW8cecdLyDu+SvnruCjlr+Mo5B3nIG88sU8U
zyT2iXDkHbcgbzzRJ4pPEn0i3P1tt2fRsOdY9d/kKn4A327zNA4B33AofEQd
V8APz+HVvo/8dYofkN9ochpvWB/rbxz5TTZP933w9Uo9wz4OfrX2a/jXn5zu
78h7X0be+7jlrb9x5L3PIu99GXnvm8gbR977I/LGkfc+iLzxRJ9ov0v0ifDU
PvW+ltqnxi3fbs9+w57epxL5CEfe+xHyxpH3voO8ceS9vyBvPNEn2kcSfSJ8
dplnyJwPf8dI7pFRPUacP/9ZmcfI3ql8OzzOh8Pj/Dk8zrfD430HHuPwGIfH
+xE8xuExDo/3KXiMw2M86Ve0fyX9ivCkXxFuO5vHuO1snl8of57yF72vVvlY
8K2GcJQ/T9stev0qT4v8ftPS/Dnyqw7VuLnOt6d6Fr2DqrwuPIuUJ4fnROXV
4dly+H2Uh3e/2u1WdNitaNiNHWSdKn8ODzh2gAfc/fJ+ZB7rYxwe9gXGCx5w
6wNufby/mMf6GIfnVuXPk/kf5c/BJ0xL8+S0+7pyngQ8WddRPhz5KcqfJ+so
yren/a3z4Wl/6/x52t86326edrv1O+zWb9jN+XB49piW5s/h2VT5dni878Bj
HB7j8Hg/gsc4PMbh8T4Fj3F4jCf9ivavpF8RnvQrwueV98jBH95R3Y+Dj+6Z
ozqKRD6ql3hpGJds9GTg+Ul1n478FkM4qpdAfpWhGlF9RdJuVBeB/GgdRXUU
1t/yxlP5ovfxqt4glS8a+tvvWd78eCTzg5vffszy5sfPmB/c/PZLlm/n72fM
h1S+38Hf7+DvN/gfKedV5nl1XjmvwnoB36ycP5nnz1g5fzLPn0fK+dPQZ8ak
tI7itdbnrKh7/xV1n/Ja8wMrKu76/67T/+u4rCj/9lrj/xWVp1pR95uvtf6H
uje+93Oj4Ekd1MD/0o6fGwWnPor1kNZzPduQN2556pOwE/s19UnYCZzzGHby
c7LwEIeAw0PcAg4PcQ7nJXj8/Ds8xuHx88Lw+Ll4eIzD4+eL4fHz8vAYh8fP
I6f1KXX9ZFqfUuNpfcqzDTsbN4/tnOAz+z3WWTKOA5x1Zpx15nGHJ32+suYx
Do+fT4fH4wuPcXg87vB4fOExDo/HHR6PLzzG4fG4p/eE9fim94Suv+We8NmG
nY2bx3b2uOOPPb74Y48v8h5H5D2OyHu8kPd4Ie9xQd7jgrztj7ztn+Zfazun
+ddnG/01bnn8Iftk/N6Pof9knwQnP8U+aTvDgz8Eh8f+Ex78LXaGx/aHxzg8
Hhd4PC7wGIfH4wWPxwse4/B4HNP8RD2OaX6ixtP8xLMNOxs3j+1snHiK+Jzz
GLjfC0GcRdxuHvOn54+6/p99nDptcMcJxrt4jLNfUPcIzv5C3eMI/lMR9iM/
dw9OPaRxt9u+fxWN/Yv7MPwh9wjcn+EP29/bkOd+bwM83HeAw8P9SHrOzHO/
5wEevx8DHuPw+L0QoV5A78cI9QLC4fH7GeDxezPgMQ6P3+cAj9+nAY9xeDwf
2vevomP/Khr7F+OLf2YcmQ/4Z48v8h5H5Bl3xgV5jxfyHq9wH6VxCfdRGhfk
bX/kbX/kbWfkbef2/ato7F/k2fGHfv8GOPlb8uzg9GvitDKfDu73cuBXyfeC
41cPkn9o989Fh38uOvxzEfzqx+Un2/1w0eGHi4YfHqv+sx8Gtx823sVjHL9H
PTy4/TC4/a1x89vful3j5X95Tl0fCOuXOj1w1jv1csbNbz/gdo0zzyerXeb5
4WrX68LyxpmH68j+ns/gns/mMb/ns3mMez6Dez5b3jyez+QfPZ/BPZ+Nd/EY
d1wB7vkcnq/WfDZufs9ntwtOnWX5eXAOreotqacEp+6Cuklw6i6ogwT3+x8c
V4A7rkjzv3VcYR73y+vFPODUkTD/6de6w6+PuK6ui6n6Rb0I68L98n4K7v3U
8tbT6w7c+w641x241515zO91Zx7jXnfgXneWN0/7uutnzgeCt6+7fse66zfW
Hc8LMf/Z33leCDzUo5b7eMDT93vUzwlx3gR3fg/c+T3zWP/29dtvrF/qhxz/
U2/k+D99T0Ud/1NX5Lgd3HF7+l6LOm6n3shxO7jj9vQ9GHXcTh2S43Zwx+3p
ezPquJ36JMft4I7b0/ds1HE79nd+D9z5vfSeqc7vmcfj2+7H+g0/xvg6/mc+
OP5nvBzPgzueZ1wcz4M7nsf+jufBHc9jZ8fz4I7nsYPzb+DOv1ne9rS/pf4A
v+d2nY8Cdz4K3Pko81ifdj/c7/DD/cz5FvB2P9zv8MP9hh/m+XD8J3kbnhv0
/QjPDfp+hDoJ349Qx+B7DXDfa4D7XoM6Bt9rgPteA9z3GtQx+F4D3Pca4L7X
4J7M/hzc/hzc/pz6Rd9HgPs+Ahz/YDv7HgHc9wjpe13qewTs5nsEcN8jpO+B
qe8RsJvvEcB9j5C+N6a+R8Bu9p/g9p/p/WXtP7Gb8//gzv9jH+fzwZ3Pxw7O
54M7n09/nc8Hdz6fftm/gdu/sR6dn6duyfl56pacn6e/zquDO68O7rw6dnBe
Hdx5dXDn1bGP8+rgzquDO6+O3eyfwe2fwe2fqSPB3ybPxUxfHPwt7VJ/YP/M
Pbrj2BXlZ1bUOnqt83BF2Zk6D9ttRd2PvNb7shV1v7mi7senVfcv3sd5TxA4
85B6I5+nqLfzfKZ+Dhwe6uc8z7vGi7ocxyG8N8TnNd4P4vMa7wHxeY33hmA3
8KEbGNYrI0+8N6mqV0YenHpo5g881D2HutpKnrpn5MGpe3acyfPDzAfyMDwP
DB6ee62eH2ZegfPcL/LkMXhOGHlwnu9FnvwGzwMjD87zw8xz8Cqv0nNeZYMh
7RHX9ZxX4XkhcHh4Xsj5lper537d32XV873u19+VembWk+d43S+eF7I+L1Tv
DfH8Ce8HmZTe9/F+EM8f3g/i+UYdtu8dqMP2/QL11p6H1Gf73oF6a89D6rM9
b3lvlOu1eD+U67J4P5T9CfVh9idd+xp1lr4v3qzit5+ZUfHbb3TVg3X5ty49
u/i79usuP4Ye/L1s/u/f/Ls/PBXaA58zfecPvmNx/d4tvge3vPlb/XbUrnHm
7bIHpn/9rdF755i3p+598fLtx9U483b9O775sYnR+9Dg8fvK4DEe8mDCvd+Z
x7j3O/fLuHncL+P4DfL/4PgN4/hPvy8OHvcXnvb31OW5cccV5jEOT1e/jJvH
/TKOn7Qd8Nu2Q3guU/1C3rjjLst36WO8Sx6/x3wGx096/rNfs17QJ+SFpD88
xuEx7njVPMZb4+GoX8bN434Zx7/9QP4KvJC/wu8V8lf2k+Y3bv/Jeub7i8c9
+KW1xtd5GfAnJj+x/47j6rwMePFU/ovh+MLjewR4jMNj3DxdeoKb37jl3a7x
Lnn+vvXqyx8+74xHAj/4Ln/527ct3uKJIM/34CGOqf4+8ef+QWe9pc6vIb/v
0xvfOvnQpQGH7/ZHP73B/tfU+btwP3L+oklL7l0acP6+5bLpd6xyS53XQ371
i6fNuum3Sxr62M7259bHdjaP9TFuHutp3DweF+P44Z0/8MAqD/6qvn/CD0//
xGlzXrhhns7tee73AcLDfTE4PMbh8fv64PH7+uBpf69gnhv3/mIe4/DY/uZx
v4ybx3Y2bh7b2Tj7i8eF/YVxRB/kbX/kbX/kbU/kjXu/s7ztY3nr09Vf413y
7Duvl/8B317+h/1oR/kf5PPKn4Ajv4/8D/vXospf0S7ya1Z+Bhz5eyq/hD7g
q8n/eD+1Psa9n9oOxs1jPbvsbNw87pf1ZP/9nvbT8ByV9lPwB7Sf+r4JHuPw
GLc+1tPxgPU0bnnrb9zy+AvX/+Av2uvc8tx48p66KH5I3lPXqIur3lMX4ebp
0hPc/Mbb6+vqdo1bnnbDefCiHY/5wvR5gR/81OPP+NV9V8wLPK7fg8f1TvC0
1/XlufFwrz8prY8K9/rC4TFuHvfX+7vtYDubx/0y3l5nWOtpvL1esbazcf7+
wu8hrPBLkrrBPOd78HQfzfOTqnpC5Ph7UlJnmOf8u5P0nkD+vvvG4qvLvj4n
4PC8fM2BczfvPRT4+f6375v46fP/dXaDx+Pi/d362/7mcb+Mm8f9Nd5ez1mP
i3H231P0vsfwvhnZmX15suyM/IuVPcHD87iV/eEP8Yns7HjAPLaP5c3f1V/j
lqdd9sHV5X/Aj5f/cf0qPK6jg6e9rjXPjcPjujt42utg89y4++X+en93u7az
edwv4+11trXdjLfX69b9sp6uG0ze+9eo463e+xfh8Dh+CO8Fba37zXPj1sd6
Oh6wnsbb6+Fr/Y1bnnnv+IF5bzx5X1wUJyTvi4twy3e1C24e45aHx/s+8o4T
kPc+jrzxUB+m/TrUhwm3vPX0vmn93V/zWE/j5kn9Wp6fqvfvhfdWVn479Xd5
Pknv2WOeLq/8M/LgW1T+HBz+v1T+3zzW0/uU9Xd/zeN2jZsH/nD+VX/5d4vV
X75/vuoXOH/fWdnB/G7X+4v5jVseOe87yHmfQt77CPLGkfd+gbxx62M97bfN
7/6ax3oaN0/yPr3Inyfv04tw5O23kTdufrdrf+t2jVue/jufTP+df6b/4JdU
52t47J/hMQ6PcfN06QlufuOWd7vGLU+7+D3yP+D4SfI/YX6Tn6vw5L1kw7rQ
Kg8T7q0npflkcPjJ84S6ikqevBA48uSRwJ3Htj7ur/2/7WA7m8f6GzeP+2Xc
PO6X9cRvb1nlLcHx25dVec50/ee536cXzsGVvwIP51rh8Ph9d/Dgx8DhMQ6P
34/n/cj9Mg6P7W8e98u4edwv4+Zxv6wn/uxSjQt+i3FEnxDXyP4hTpH9kbed
kbedvT9aH9vH8tbHdrC89XG7/H3xqtT/0M7W8j98v7X8D+2sKv/D3zUqP8Nn
55P57Dw2uPPY4M5ju1/ur/df6287m8f9Mm4e98u4edwv6+l8cvLewgG+UPup
89XwOB6Axzg8xq2P9XQ8YD2NW976G7d88h6zwT7L/Ts4+zL37Pz7EJ9UuOW7
+MHNY3n2nSVV/QM4+87JVb0EOPvOOlV9RfIetgEP9geHxzg8fr+f90HrY9z7
oPUxbh7rY378PHEsOH7eePnv89zvS4THdoDHODy2j/cd62McHvfXPNbHuHng
x5/bDvhz2wF59xd599f7hfmtp+XNb56QP6zmMzjr3vOf9c16gR8e9wse4/C4
v/bD1se4/bD1MW4e62N+/l4sf8W/e0D+Kvh/+avW5yAiHutj+eH7RvZ8vP5d
2sNmvm7yXTstzx6bMemkc09fGvA373faxAvfVf/+Md+Dn7/Z3mt94J31796O
rk02GNVrLfrDncsDftAxX9twhzX+M37f4Oh78KH/fc+i+nds2/UpOtotOtot
Gvxj1X/mBzc/uPnBzc9z2+YHNz+4+cN7rSt+xovnEdv5+x38/Q7+fuZxOaps
J/CDzy/byTwfzi3bCfzgr7z66sJBO+IvGvMnet9UMh/mF/fv/jev1L/7+cc7
37j502+YP9x3L777yIcDvtuyN/z+jGcejd9PNfoe/PWDcbnmuvp3Re86feVH
z/vSouyWSQue2/j79e+QrvvDla7Yat/6fTLv3nvaYVP/+Fhvylpf/+Whn+ln
U86YNf74D/WD/O3bn37Wi7vVvx/P9+CDfi741uazwzyx/uDWE9x6gqMn7YHT
LnZj/rhdcLcL7nbDexfULrjtMKdsP7QLPr9sP/N4vTxwT9OveyS0C35j2X7m
cTmqbL/R7rDufstFnrdFx7wtOuZt0Zi32NfzFtzzFtzzENzzCtzzB3z4/NAh
J1/bu/6qnZacvO2MbOUB9uEJeRj3E89ff5Xn+ndkFwz68w83zAr4W4t1L9z6
2vp3Yvh3yIPz75A/drD+F77vnsBz4D+v9u0b/vrBIL/d8dvuf8ITD/SuuPJN
h+wzbk7GZ74H5/NwfHebkGdu99yy3cx6Hl22n7ndrcp2MvPPL9dZmG8Rnsy3
WJ94voF7voF7voF7vkXtJvMt7m883yKeZL6xrjzfovfnJPMten9OMt/APd/A
Pd82KedZ0Iv5xvh5vjF+nm+Mk+cD7do/gHu8wD1e4B4vcI8XuMcrajcZL3CP
V8TTMl79jvHqN8aLfnr/2rQcp3o/qcaL/njfgQc7mwfcPODm8b4AT5gv4rH/
p7+OH8Db7dzvsHO/YWf+veNS5BxnpvJFh3zRkMc+lge3vOM65B2/pfL9Dvk6
HmPdej6Ae3zBPV7sH17X+Flw/C3r03EX69BxFOvQcRR+GX7zgJsHHB70cTwD
j+MWeBy3MC993mH++fyCv/B5JJUvGvLob3lwy/u8gLzPBejv+D+Vr+N88lPD
5yNvPLDuL3mu4XuFD92v7i/yA/FfX/mDpQ385kkLLvzcrk+G9QI+ruTPzL9p
yd/QZ/eSP+Dkj6Ys+MbK+y9cHPQkf3TLpF2uXGlRjZOHsr+Fxzg8XfKck9AH
eePR8yyJP4+eW0nw6PmUVvzsXa9+6eov1+sr+j36ie9bMifsC/APH/c989x6
3aHP4Nu1zjylXnfIDyfP0cWc4DfAB//q4Le/fX6Qp90BvuGrRz8a5MEH0+ry
6T9bGORp971f3GXldSY9EfYj+D/9zDMTt32qxsP7X9a++c7Td+o38DNLO2S2
w9mlHcJ+BP7TwZ+3bzk/sx3OKe2Q2Q7fKu2Q2Q5zSjtktsNDpR0y22Gj0g6Z
7eB9DX7j8BiHx/sdPMbhMR7XM78nWi+l1ynrlmOcfKXXBTzt550875L3ekHe
eFSnnayLSP+W89RI/1b5H51817+fMG52L43/R3qOzt/gUR14EidH9d4t57VR
XXerPOfm9ByR58ZD/a7icHg4Z6fnjjw3Do/jdnjaz4953iW//SAA+Nar/xjO
g+APDfalT/73v/XSc1meP1meA3R+HP1+enJ+hOfywTQ98Q15Lz3H5flh1fkS
PLwXaey4yU/dcm8vPd/l+dY6b4I/tVd5XiGegWeLsl+Z+3V32a/M/Xqi9Xw6
+t3z5Hwa3me352ADK76auV9b6nyKvM816NN+Ps1z4/AQj3v+GIfHODw+H8HT
fs7Nc+NRvxI/FvWr5fw76leCR78n3urH2vMwo98TT/C4DjP2b9xb2F8h34Xb
X0V1oYn/idptxY/48PhrDt649j9RHWniT6J60Vbc/gQe+xPk7TeQtx9A3jjy
n52S+gfwnQf6HBD5B3genTBaF2FdI//RKel6BN+m5MnMc/eEdH0hP6P0D2F9
gXu9wGMcea8L5I0j7/mPvPFIn2SeR/okePR7wa3z2Xj9u5BpnFz/ztfcz17x
eI1zX+V5Do9xeLrkvS6QNx7V3SXrIqqvS/Coji7B4blAcTL4RYqTwX9Zxodh
vYAvUXwLvo3iW/T8nuJn8MWKn9H/u4rDkXc8jPz7FT+jz1TFw8EOiofBb1E8
HP+e7+C8kNkOjym+jX5XLolvo9+TTeLnaP4k8XP0O7NJHA7/J8v4P3N/vS7g
Nw6/cXi61otxeIxzP/ounZfBP6JzMfeq79I5Gvw7m+193Hp/XNwz/3idl8H3
1LkYnvE6R5On4D7Q93Rej/HvucT7I3iXPPdIvsfxfgTufQe8PT4pf9egeU4Z
G2s/R4zuX5J4Hrw9Dh8ba4+rx8aOVfwJTv6beBLc+sfvsY/1B7f+Ic8se4Jb
f3DrD96uTz/zfAC3PuRhBvgOL/9lcfDz5G2+rXmL/DmlfGb5qaV8Zvkby3xR
wOvf30z3KfCuPMwM+XPOxUfKv8GzY+lXM+clDij9cOb8w/7yS/XvP470DOsU
nqPL/TdznurGMk+VuV/Ob8NjHB7j8XPNbef3rvO140/wrvOp5xtxePt9ZZ53
4c/uld5Xwv/8nml8CH7fqfP7x039j3C+o93vl+fHxjnrUN0PwnNXyZOZZ7ri
RuQPK+0T9lnkLy3zCZnzCb5nhMf3U+G53NZ7xjw3Do/vs+Bpv5fMc+PReSq5
54rOUy33laPzVILD43kIT/s9Zp4bj5+nazuXdZ2znM8B7zoHed4SP3t+Ij9X
eQnwXPkHeOZqfiL/gOYn8g9qHoZ6dM0r5D0Pkfc8Qd448p4PyBuPzh3JuEfn
jgRH3uOLvPE6Lk3z9uAed+K0E5XfRv4g5Y2Rtz8nrrP/h8f+GZ6j5M/r3yNO
/T887i88xuExHv0uebL/gt+mexbwqdp/wWdonyVunKZ9mXsg9mf6tXcV14JH
ceAoDmCfh2eDtS55248fr98fCM/ya/O/+uTC+v2B4FPX/q9XhvOA/c11a/DQ
L3B4jMPjOjd40B8cHuPwuC4Onqiub4TDYxwe1wGGfSa6Fxvi+FHj+FHbBx7b
AR7j8Ng+8NgO8BiHx/YJzx/JDuH5I+Hw2D74Fdsh+EXZAXn3F3n3F3n3C3n3
KzzXI/3Dcz0VznzGH3j+4w/AWS/4A/cLHvcLHuPwuL/wuL/wGIfHdgh+V3aA
x3h4rrbCOT/jn6Lz5sjfgaM/52pw9MEPgsPPvSnrjn2TcwI4+wj3muDEA9xr
hvd1Vfsj95r4gVDP+bqrz9t0rfr3ssFn/uhz+12yS/172eCXPrbmequvNjus
F/S8YPXD17x2/dlhvYCn9aJ57rpNeMj/gMNjHB7XeYZ4ubIPODzG4XFdaHiv
SWU38PD+EuHwuI4UHuwGDo9xeMDpL+vXdmD92g7Iu7/Iu7/hOXj1Kzzvrn4h
b/2RByePybpDT/KY4OiztJrP4Mxn8pjh+cJKH+YnuOcz6xqcvCTrGpxzHfbn
fMc9IuNFnp97RHDy/NwLghM/P33pNxdMuHlWmA/Ez8Tr2BP5gz919vYv/Pn+
gCO/fK+4jrHW84mkjjHP0ZN7PnD05PzZoWdmPbnnQB/4txor7znA4eeeg/kA
/2aXlfzg8FMPgZ9hnlxX5X/t9/6lytuG+ppqnlD3EN5rWNdrje5L7GfA7WfS
+sPaz5CfCvfVVbvg4b5aODyuM7R/ALd/SOsba/8wtfS3wf741YtL/xzsDE6/
7E/A7U/QP9yzqV/hnk39sn8At3/gPoD1i57k91m/UT52lH8PzwFX40udluN/
8nrg7MvUaflcQL7P5wLy8o7nwR3PgzueJy/vOBzccTi443D4HT+DO35O6z/r
+Bl+x73gjnvTetE67oXfcSy441h4HJeCOy6Fx/EkuONJcMeT8DsOBHccCO44
kHsOx4HcZ3BOjeLSUXzoeUidIvMNeeoRkY/iz5G8+bmPAY/qt0f7r/0q9XbM
N9bXtOpe0H6Vujr71WnVvWB472yFk5+ynwS3n0zrfms/STxp/0b8af8Gj/0V
uP0V96/2PydU9rH/4d403FdXPNybhvcZVHbg3tT+inoj79fUG3m/pq4InP2U
vDN2Bj+gih+wM/vs1snzLHkOvm9VD+H9fcdyf+95f7+pqofo2N973t+3rOqW
HEfdU9UtOY5aUtUhuV+fTeq6azvsUfY3c3+3TJ7XqPtLftNx10crHsdd1HH6
XMY9jdcR9ZpeF9Rf+rxG/aXPa+T7fF6bV8a3mc9rt5fxcObzGvGAz2vnVfGD
z2tpfXt9XiM/63MWuM9ZaT18fc4ib+tzFrjPWWn9fH3Ogt/nHXCfd+DxeSfk
kXXeoS7B5xfqEnx+oZ7A/oF6AvsH6hV83qFewecdxtfnHeaDzzvMH593qF/3
vsO9pveddcs8T+a86NIyL5Q5L3pOmUfKnBclX+x8JrjzmeDOZ5LHdx4S3HnI
9PmFOg8Jv/OH4M4fps871PlD+J33A3feDx7n8cCdx8Oezsthf+flGC/n5eB3
Pg3c+TRw59PI1zvfRZ2H813Tqrja8Qn5fefB/gfOoMRu
    "], {{
      {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[
        GrayLevel[1], 3], 
       StyleBox[GraphicsGroup3DBox[{Polygon3DBox[CompressedData["
1:eJwtlVlMVVcUhvc593LOdUBFqQoiCIgIiFoUL4iGQVFQgVZtGwdQFJtWFBQs
qYJDHJqqOA+M0hjaausQjU9tH5u+0KpJ+9YYk/YFFXEKCoqg38q6Dyv/v//1
r3X22cM50Rsql1fYxpjLhIewCDvA2x1jrnmNyfcZM4f4EbEU7XsiG+NEsNA1
5iqebnA4uAT9JjiReAyfF2RMIrnfwD302I8+C32IV2uz4BH06eB5PxM/EQnk
VjOJX6j5ipoLYDjeDJ5fTb4YfIjnOLWjwHeMQ+Bfwufj3w0W4K8l0qgdAHOJ
Sny7ySeSL6b/r+TqGLeDJ8hHMY8oPHloQ/HkWfr+d6QXeJ58K95MauMYZ+Hr
hc8m/xy9j7kdwnOPunr4v+AFcul4v3V0bi/xz0L7g/x94nfiIrlMvOFgC33m
44ml5iDjbfBk/Ba185ibHy2UcSL6DriNvoiavfKu1Lyh34BH9YUyJzwHiEr8
Sa6uZRZ8Ct7v4DnwePgKar6gNhVsQ89Gb4NfhC+AT8WzkPoKtAn0Hu/TuY5D
C/PpuoTBz7u6bxFoxcQC2Xe0fdSn8I4+MIQei3nWGPAIcxuBHgTWkZsBd8AT
4BY8zeBhcsGgB6wBS9F3guk+fefF9A8Gl6LdAhtc3dtI8plG/X7iAbljeEaC
0TIHS89ujdH55IuPGj/aInqU4mlBOwVGErn4r8i+kytgvA5vD895i+cbR+t6
4Q2slwUPxV8OxpCLxb8MfxG1N9BegMPkbuG5LvfGVW8GniSwxNY78zHjJ4xL
yYfDP6dPoaPrXwZf6ujZnEYfr1fPksxRzvABcDb6K1v34Rm8xKP7tQkscPSc
NhLHiGyeUYi+nnw9PJ66ajxl8AF6fYoezDjZ0rsQTcR49PtQQuQGzuEEvA8t
vXtdRDV9/vNon7fkXoM91KaTW01dFNpUPFvknsPLmcsc/F/Lmtp6xsYS28mX
4Y/BkyxzC9Iz/pxnrZO77er3Zg2ePrRm+vSAY/G3gK/BYDxx1FbR+xW8C60D
PmjrWekHe9Gfov8l7yhri7aNvqMYf0ifRvCxfJvQ/5c7YukZugTukvdCj6JH
KvP4Qc4J2l1Xz7fU5sCL5FtKvhPtKHUjAt+ZHmpTXF3/rTzDi2cl3gd4/IzT
GDfjmUE+Rr6VRCyxA0+CrTWT6JUEr4Bn4POTW0VdmNx5+gyCO5lHmq3f1ZGu
rr3se61Hz8Nn4Hh8bZbu2d949siYug3wN/A+MALswjNXvgXwVktz53y6943y
3q7mB8FG9G54c2CNz+D/AKzimWeIzUbP+2n0UK+eqRfwyMDelQfpvcuHb0a7
LeeUWMW71DK3BPhaeB3cJbrgHWhD4N3wudTmufqv+NPVve4O3K9/8JzjWSmO
zrFG1pncRnL94CfUhpBLxdMEbnJ1LeVeNPj0TDShfSRc+uMpgj+Crw+ctZPU
jvbqP2om3PXquc0IrE8V6z7Z1vc05MZY+p718n9DagKfEmfhnWCLrCn+6XI/
eN4jtF5Hv1ty/luN/n/6pRbfeyIR53w=
           "]], Polygon3DBox[CompressedData["

1:eJxF3AW0RVX1NfBz73036G4QaZFGCZM2SIMWkA5RQMKgS1CRDptUEWkwkcaA
PyWodIigoqCIooCgfPP31mZ8Y7w13t5nx6l9Vsw1911s530/tE+/67rdhl03
lf8zj7ruqfw/LAfPTPnxcdfNNMjxyO9Snj/H3tFL21TV742cl77nR36d8vWR
R1J+NHJDyq9l3hnSf8v0/1HqX8j4OVJ/LfP9X+oH5PhiqS8eOTDlr6V9pZTH
Kb970nW/T58fZa4fR55MeZD2WdL+0bTfmPoTkR/2q4++rsG1XBD5TcpT6b9U
7ufZ1G9PvZf6oqn/PvWfudbIJNcyQ+TRlB+LzDioe3bvC6T/Bl3dv/O7J/f2
WL/Obw5zPRn5ecoPR8aDmtPcc2T8u7qa87H2PBbp6hl5VvOl/e25n9Om6vyz
p9/aaX9bjp2TY/20/zP153P8l2nvUn9D/j2e8Telfkvqn0vf4yI/S3nhyNop
n5+xf0r7rZF/ZOw/I7elPM+o5j457fePaw5z/S5y87jO4VzGGOuYticit4zr
Ht3rU5FfpHxC5puzV8/3jvZ8Z0x968z/09T3i9yY+k2RT6Z8sutPedHIKd5N
nsc9Kd8bWTrltayR3N9vUv9T2v8QuTvlX0X+mPLTkV/3qv3Pnm3ksPT/QeqP
pvyJjP9+r+r7pLxejv0x7Uf3q/9DOf5g5OHII5F3p8/xXc3/VNqXyDXcnvId
kSVT/luOPZHy7yMHp++6kVPT/6nUn0vb3yNP9qr+fMrv8T7Sfler+69+XFdz
fjzjr+7VNbrWddPn813dv/tbO8dOSv2x1P+S+lsiO6d+SOp3pvxgnuuRKR8V
eSjlt6X/bmk/NvUb0r6KZ5D6qanflvJ+kb1SnzV9/5m+K6W+T+rf8ExHJcrz
pX3zfG/vzHs/MO3fzLFXcmy11PdM/QTvI/U3pv9mqV+a+m9HJcqXRe5LeYU8
s8dT/l1kxZRXz/i90/8k7yvj35Fr2Df1M1K/Pf0fyLEjenVP7u2dad8/7V9N
/a60/yXHzuzVNc+R8i9y7MTUZ0/5BWsr9aNTPyayfepvj+yevsenfvOovgnf
hvrPR9VHX89rB+dyT73SQXTRcsNaH9bJ8ik/kzGP9up9PGv9ZB09GLkvcn+/
vt/1c775c59/zHyzpb5m6ium/5dT/kDk26lvkr6nOJ9vKG2/cL6Ul077Vl0d
07ZB+q0f2TCyUeTUtC+ZtiUiG6f9S+37WSSyUeqfoI+phVz7r1JfJbJq6kvR
KWn7ujWU8iTt91hboxprDt/i6aOa2znOGJUoGz+t/yO30C3eacqjyD8y/99z
v3dmvrdG3pn6v3Ota2f9PJb2m3s1xlj36F5/Sb/T1zl2smdBX6f8wxz/UMZv
HrnWdeTYFinfkPK+6f/j/P9R5LrI9b7bNsaxR0b1Xfg+dox8ph3Xfm0bs07m
OKWr7/evo/oGfd939urbXN/1dLVevd8103+X1A9P/ZrU78tz+3Sv5r4/5WV8
813dg3txXPvBvboW9+TeTmUTRtX2qchnW5+lcmzLrp6RZ+UeXPOPm/767VT1
N865PQPPgg6lS+dNn/Uyft48/6dSvzP/H0794znfQ1mvcwzKhrAd50auS59/
DcqGsCV08j39soF09XWt/qvItSlfELko5dnT/lLmu4qNSH3+1P+b+vd9c2x7
5OqUvxu5OOXvRS5M+crIJjnvxpErmr3cIeXtp8reOT/bsFXkmpR/Erm7XzaN
bft26uukbe3It9r1fCft3+ZjpHxc1th1uZ9rI59L+Ts5dkna5sjwl4flY/A1
toj8MOUftOt3zd9v9Zcy9oX0/9+wzn8n28XHGNd4dTaarTb/ulN1Ta7tonY+
9/zdVn8l8/07/f8zLD+EP3K180UWyj1tmLY3ps+z45rDWHOY+18ZM5NrH9Tz
M3bW1Gfpag7P4HvtfMb+uPk65v5B83P4O+dEzm3P6Lv9eoee3TF5Rt/P3FdH
jp7UOZzrP4O6/q/k2Gq5t2etoVzr5Tl2Pb2W+qu5tktS3yjtG0YuHpcovz/y
vfb+zeUZeBbWy6ZTtQasBeN/mvnmzXyvDGt+9Wsil6V8Xsbdwt6x+YM6pu0n
kUv5Arm+W3L85sjnUz4lcl/Kv42cnPKXIrfzJSMnTMrGsXXs1UfHpe8fSf3h
qbIV2p9O+eRe2cZ/pT5n6qfQUaPycR5r/ivf5y+RBQflA/IFvcM3pP6+rt4t
H3jm1s435o/y9fh8c7V2vvIZU+VPbuH7SfmvmX8GujT1K1K/PPL8uHxUvhSf
6n3j8pH5ym/OfONR+ZSnut6p8jU/FLku5Wf61c6H5Evqo69zOvfpU+V/aufr
slls199SXyz1jVLfd1TX4Foui/x9XGuLf392W2NPtvvlH/O3/xCZJ+W5mz46
N7IW3z1yTsrLRQ7IuMcz/zGjavc9z5b6i1kP30j9v9YjH2lUY4x9V+TslE/P
O32EjoucNqn1TRd8y3WlfGSOXZa2SyNHpHxS5O6U74qcOKnr9c3M097fWTm2
Eh2bYyuMy4cXS9BRdNUz3kHaFk7/N6T/n1NfKHNtnPoio7rf+Qb1TXv/5jDX
E3yw1v9bmeuCyNPj8sEXaM+Xb67ONz9vqvyFG9t6W7Kr2Maas/Yeaf69Zz+g
u7t6By+Ip7rSCXTD86nnb/p5eF63pfODqe+d+gNp2JjvkPqykQ+lvEmvjil/
OPLT9P9N2vZI/zvT/yFxXur78fGHdc/r9Oqe3Jtv1Le6r3seli/kWS3UlU/E
x+HrbMoGpvxwv3wmvtID7inj70vfPdmcjN8x8/8y9QNT/0r6fzXy+ZTfmvN9
Oe9q03bNrnXzyFUZf0/67yp+y/iPZvwvUn8ix1dL/51T/2tXc5hrp9RvZf/T
vnral8+xg/q1BqyF49P+Sldr0Fr8Dn2d88yc9o3SfkmO3532XVx7zndf+vRz
bDCo+GmW9F+dLaWTUp+9+WNiQN/nMPVZ+ShTFS/NxEfvKt4V/7yWef8XeSXy
ar905LBXOpfunCvzzNlsOtvOBo96pWPpWjav3ysbxZ7ou05XMeTs7Zpcm2t2
7RbTa+1c/40skLHzRxaKLMwHd83pM4o8RJeKFzNsKvUHUv9i6nP1ummwQLxn
7HyRBdsc+uhrDnOtTLqK904c1TlWTH2lrs6931TNofxJ/s5UzTd/a6NT+Dq+
Od/eGZHNc91bRM6k/zLnhZnrw6mfPi6bzra/MCh/hijzgfg6nh9fhr/D/yDK
fCC+CZv2k2af2Do+w4uD8hn4Dv/XdMnckVubjbo2/69r9owos6FsHR+KL3Vt
68vHuKtfPg/fw/tmG/kf/BU67cJ+2XC6zjf9reb/0I3nNP1Hh57bdJVrci23
Rf6R+bzmC5t+vLjZUzbXeqJz6V736F6d07n5PHwfNp/tv6v5Qx9mI1L/Ih3V
1htfi//Hv5v28Zp/xd4vFvlAyh+MLD6uMcaeEFnK88182+Tdbhu5eFQ2i23b
ole27IOpf6erOcxljLFfiiw9Lp1Ct2wWOW1c79y7tyasDed07g9FlhjXNbk2
PuBVzV4615Z0yrhEeSv6xbPO+d+f8kxZe8+Ny6fj2/17UP4uUbYmrI03RT7C
30p9keiLb6a+asZ+Nsfem/Ik8y2X8VtnzovE+pGD+9VH30NTvzPtO+TYsuPq
o69n5Fnt4R2mfElkT9ca2U6s65rHFXOLvS8Xn4xqvu34LsPy925q8S+MaDvr
Wfyf8iecI/XdYABd+dNLpf8eYpCu/KnlUt8l9du7sq+Lpn5rsxc/jXyNzR2V
7bh/WP7XYaPSlbcPyz/ftd0f/3Px1N80KV+OT7dsytum/SdpP4sPkfqpGbeq
tQcjoPty7LT8Pz0y16TGGPszPpG2YY3R98zIT5q+/r4167vP/M95XvRe7vf6
UcX/MIOP+NZTPyzlQ61Jzzb167uay/kuT33PtO0R2Trtu6d+b1f34F72hFGk
/pd2PXxwvjsfnm/+XjF2V5gGbOPIUdm+B4fln/Dd2GL2mQ8HY/lS6h/rCnvh
g/A9+CB8Ez4Ff1SdPT6kvZ9tM3aZcdnUuyM3DsrWfo9vnPaLIgcpu57MP3fO
8+9xYUSwIj7wv9p822SuG4blTx0+Klt717D8b2OMPS1jdmQvB2W/fW9XDcv+
srdbtO91x2afN2vf47fT/+epb0w/Dsu/pr/oMfc3e85xco6fQs9Mak1YG1+O
zMO/bzg1DAOWMWOOHSsW5JNaG8Na+1ekfqV3NKh4m765earib/jCVk3/fCXn
Zc7YHLaHjwGLgEnwPZYZVN3xG5pt6pUZnbZ5b841H5853pK2N+T8X+tPh7HT
mBJsic9wY+TiQfkS/IGlu7KhbKnn7Hl7R97VMg0P8n1fNqqx+mgzx6cHtbat
8UvaN+nb5AO/cVL4jPnhs/Be2K7YGia7Y67nM2L+rr4nz5fPxneD0YvR+WiL
d+Uz8t3Y3vW6wqj5rHxesc88zR4vmPpavcIaNpiUj80+eqfe7bw59pX0/Sob
nvIOab8p7V9vdfg835cPLPaCL26a+gaZ83y6alT5Bv70e+iHjDslsmNkp0HF
WL41cbPYS/4C/kW//TDlj4xKV30pfWfL+Fkjn0/5C62+SPu+6Hy6//l++Wcf
S/2OnHOnXvkqfJZde+W/8WfogythQf1q1++29J+FTzmoc8za/Efv7VPt3dGp
dKuYdflJ3aN7FVOKLX0Xvo9bIu/pFz4FD14y5VnHpVfpV++frnN/13T1jD1r
mCnsFOYrvv1H5GlrOu2vjMvHvyNyzaB8f/qeP05XLJPxW9Cj9FnGvC39VhgV
/vvhHP/PuPTZn9K2xrDq70v9jK50LF27ZuTTqf8z9Zc828jZqf8n9f+k/NZR
+af81JfHhXHQl71eYQowDb6VNSRu2y39zkn5VT7vsHQi3Xh6u6YXxORpWyRj
/5v51oucm7b/5dirafu18/Mn0/7SuGwcWwdDWjrlA9K+TM5zZOb+WOpbpn5F
xh+e9vGk/Cj+1KtdYVLW3g9T/nJXa3Cb9P9RVzaKrfJsvSPvxjM+kH+TOY7J
sU+k/QHz53o+QL/7foaFBdJRdNV8w8Iu6Ry6Z//0XyrjD8vxPSblT/Lf+H/w
HTFh/rqXuoqZ6Wn6Wox0w6Dsme99ibQdmPGbpX5+VxjzGzP+U6Oyt2zofpN6
Jp7N9W09TIaF78P8F7eG0/8tfO0c339Sdow9s4buGFQORS5FzuagzP/+QeU+
Zkufjw4LXxAP0i2wj3sHFa/SCeekfEHGv6dXeNlfx2Vf7+8qnl8h5ztqVLHt
48PCf2AUYlBzmnuvUeGhd7bvSzzMZ+GrfL3ZU/GqMcZ+O/X39goDgYXAZvhf
fDYYjXM6N0xhxUlhrO7ZvToHzAf2wyazzR9L/ZGu8IpV2cv0fbIrn4/vt+K4
7NeXU/96yivxEVP/auprNvvGfrzs+2/zPZPys+388kXH+z7SfziuGJ/v5R5v
a/foWXqm6nJIchdyGJ8e13vwPuSk5uxXjk0uTU7tU+PSCdbtCYPSmfJn8nEL
pe+M48q3He57FT+Oqq+1/sU2ZsNB5bPmT/vO7iX/v9XVmuv3a076eNqHHBQm
D5uXY/vMuHwXa9ja5cMcPSps+/fDwn+834e6wv9WmtS98z/N5xnIycnFycl9
NvPtPah4Ysb02XZY8cyFqc/su/F8B3V9rnPrYcUf8jUTHxV/T8zSKx982hdv
PtVBTad7v96fHIpcysuRV3qlr+i7ozPmv73SR8ekfHjkefoeJj4pG8VW8cl/
lPKykT9kviP5wGwfn76rOcy1+qjycztwQDJ+jdQPSvGjqfdSP1KM1it9e1TK
b0/7IV1dk2t7W+Tgrvroaw1ZS/PyW8YlyvPRe+PS3/Tvu1OfP/V3jirf+lrG
H5v65qlfYv23/vQ+/f/ZyIspv9CrY8ovRe7Mfe+d/x+P3DVVNpat3bu1XZL5
TqNfIpeO6hzORcl9ju/ZL1/2e5E5Ul4jx7ZPed/0+cGo1qS1aa39r5Wt1yMj
w3bcMWXv/N3pc5RX7bvIXFc1f3+vyNV8G++Qf5T210YlyjO29bG2eCLFmXzf
4xJl6+sLKa+T9ufSfqLzjkuUT2rrjw/Bl3BO535TZLuuno/z09fndXX/7mf2
fn3Dvt25+vUMZm9lz2Z9a7Sr9zc1Lp07W+uz47Bk9jZup2Hds3u33o9PeUY+
UFfvwLs4KLJKv3xyvvmc6bNs6gdmve2c+uxi4NQXzbsbTsreXZ3xK7ietO3c
K9+I77RbZJdeHVPevVc+jpynXCffZwv+Bf3kGY6rzzapb9vVWN+Ib8X79n38
dFSxmxjuWrY2smtX+fHrUl488sGucu5y74uNyvaywXuNS5SvFHOlvEvuc4F+
reddh3VM21XWaMoX8Esj341cFFm0+at0BF3hGlzL4e38+p4XubCNsaat7TP6
5d/TkXSlczo3HUvXLhyZaVw5VrnWM1N//7jsNl1KZ8kRyyEsn/JHepVbOGZQ
sTObfnTm27Stn7NzfMFJ9dEXhgBLEOeKd9fsVyy9PR3h+oYVb500rvfjPZ2c
8sLWdMrLyIum/Q2pr5v6m2Aeqa9u/q6+nytGdQ/uZZH2Pv9vqt6/d3n7VPlb
V6b/AbmOwaR86J3aGtH3sOZvWYNH5Jo2yByXdjXfDOPyYdZva8i1btv8k8+l
78yTwtTFFzhHuEfvH5V/y899Nf2XH9X6ss7wAzYYlK6Qa14gc7xrXPrX+39o
VBibeIkPIWZdq+kP/Bb58XWaPpDvlv9dYlSxpJy03PU2w9IfdMp7cq6thqWL
nNO5J+15WQMnpDxo+piO/iJHdFS5SXgd/HDlUfErFpRTnRTOCG+ECcvBur/d
u7KHuCrLD0q/4Nzg3vyv4aHwMfgm7sOOXeXUcWRebfgk/HA6N9ira6VT5azZ
K/qX/4Cb88qobJVn5tnRZ9YDfxCXB/7I15cjgl8uFFmrXz473x2fYbVe5avW
mRSWDH9epVc5L5j12l3FEILwS4f1Hfge2HKxP/zrjq4wAJgabG25qcLn5M/X
7Qq/h2/Dt/SF3y08KQwFlrKsWHdSMbXY+vLIYpPCy/jWV7U6LgHdZA3hFMBh
xS8wfDno5QbVrh9u0VYZf1VXmAXsYu5RxZZw8XNHhWHAMo4b1PqFv8svTGWu
d6Z+xbCwUT4N30YOCfdEjkluaaNh2Vr2dy3x5qj4QfwrXKbZ0mfpfn1vU5OK
1/gP56b9NynPMy5bwr6cqOwbSXmxnH80KX+C/wCPhDcu0fLLP4gsmfKh+X+I
dR3ZelA5GpgMLMYzu6hdGx+BLnWN6o6PYX+Zc7+uYjaxG8wQdugcziW2haWJ
AeFkviHfEn7KwsPSEYcP6zrojre2+eaCs2X8NoOK3egU7aul/YCUv57x94wK
3/tz6n9q9+N68I/wkDZLfZNh+VJ8qrVb/Eff0rsziJciR9AhrS4XvVe7Vtge
nXwUbHZQY8xhLvjtjMOK8cX6+zd9uPKg7BlOFW4VDgfuhnyFfMZKg/pefbe4
S+zfLl35+7hLc0be3hXeKf89W67h413lv+XBVxxV3fFNJhUHi4fp5KMGda2O
Kbtm/KbVurK5bK8YWazsnt27vIH8gRwVjof1jR8Ef8ZV/Fe/+FE4X7hf3pXY
1pp5/Z0d2taOdwXDwl3EOYJt3c1nnSp+1Sbj4ijiI+Jg4i7KSf4u8utB5Sr3
HlU+U15zlUnFDGIHHIKVJyXK97d2HAhciOesnUnNYa5zB8VVkBN9Ugw4qDnl
aWAEazeOiLhUfCr+Etu6FsfubfOICcWGctpvmVSOQK5glYx926RiPrHfq2lf
Y1IcMvc6bN+/OEg8JMZ9YFB6lD6FocCeiTy9HLo2eUG2gE3ACXFO53603Z++
MIR3tZy9e3MOc7tHY9zjOm0ueUm6jY6D1chDetfeuZyX3BcbxPbggMh7yn8u
1RWHlOCT7tTazIHLsmGbG3cHFsnGsrWvz2ku58IdgmXCNOXQ9KFzt2hjb5qq
3IkYXiyPA4fLhtOGS4djLPcK44P14a/OnXovx98+KR+Lr7V66u+Y1LXBqGBT
rhEHT6wn5hO7bxg5q18+M99ZjlOuE78OVw9HD1Yt5hf743TgdsAX5IbkPOU+
YYiwRDko2DSMGhcOZg27dk/ujU+1V4sX5CbOGVXeFRZ9tlglfY7yXUWOmCou
COx2va5yuvKybCpbiiPyjYxZuVc6gq5gX+WGT5oqjjCbxDY5h3M5hj/MBr/e
V+76xKkac2H6vI8u87wm//+cp7ZrgeHCcvEJ3gvPmBQ/BUdmvUnxk9lnfJL1
J5VTkFuQ07tyWHlgmDQs+vzmI/AVzGEuePH6XXFczGcOc8Gr4dM4LrgY7KXz
mwNfGp/D3PBvXAV8ELwQGJ14wT25Nzkiuo8OXFXbuPgJcgUfHFeOSDwHI5b7
5uPu0nwEvsA3M8dbU5/B9+n+8v/KqeLc4AFdP1VcBzkhuSFzmpsPyZeU85vO
/XXFHZWTkJswxtjNxsXvcE2uTc6P7qWDcTVxYnFh5QTlBnEcxSpiFrkwMbTY
SowlVyhGF4vyGfmOOMdiKzaJbcKJ/EzzGdkiHGTcWjk2uTY5tqPb+nrLuHKO
8A4YPa4qDq7+fBS+ylnjyqfCFGALdIUchtwFneGbZ2O2arrgwVHFZ2I42Cof
na/umDb2Qy6EjWArdo6cw7fP2C3y/D9gzU1VTkxuDGccdxzGAeuQ45LrmqvZ
f5xl3GVjjJ1/WDxTmC3sVox4VfN/YTdsOtsuRzvDsDBs2BAfgi8BE4IN8X83
GRVmrc6H5ks/O1X5OZzuNQblI/GVxJKjlHcbV4x5QfPfHNMm3hwO65zODcOF
5coh8934cLCgD06KD8KX5h/tMi5fkE8IW+IT8Y3mtS4nheny5fn0Yj0ceZza
47rCeuUF5AfkBOQcFhoWFxjGDevGARYbiZFgJzj/uO8wQ9ghDFIsIaaA7eDc
wwdxeDcYFYbJt+Hj4OrCoGHR4tUDUt54WDgTH5gvDAODhclBbDQqzojc5K1d
cYNenqr74wO+Y1AcezxeXN07lNP/Gb4luzKpPQxivaO6wo42HJU/yVfZblI+
KF/UPbv3T1rTad9SHMA/HldcJb7C7YepwdaWnCp8/uAcu7GrfJn7gcnD5sXm
n5wUhgl7EkOKJT0TzwYGA4vZ1TXC5q2NSeE38hP80b0mhfHAemCcuOkwKljV
hV1xabZumK2YVGwKQ4IliUHFomJQsejxXe2dgCHBkuBx+wwqR3FY88H3nNQ1
uJYDIrtPimOJa4nLv+mkOJq4mnJMck10rv09i3eli81xePPr92pzub995SuG
FaOIVeDZ9l7MOy4cTAwjltl6VPlSuTfnh0nBphanlyel6+VA5T7pfPkQfATx
18cnFYOLxWHg9qYcNKl35Z0twLZH1k55KWMnhVHC6s7rCnuR44ZrwbcuGxaO
BssQf8glyQnJDR0b2WdSogy/2Dflz9LxXeW/vf9T2hzGyoXCqBZs+nLfQZ3D
ucTElzY8x/il6emM33vS4o9h3d/Hms/vmDaYCmwFBgGLwLGRu/9FV1w7+R/5
RvlT13dw5LyMPZ8Pz7a38jmRc4dls9luMesVrY92/Q6V7xBv+Vbo80lhMLAY
+KC9G3I48izyLXKn+BPyQfgfX5wU3wR/RXx+1KT4Jk+n/lTqh/Ofc/3H9QtT
hC3iNMiny6vjjuI0yDfIO+Aa4zvgd4hnj51UH33l8c2vj754Fs6Pj8zHF3ec
Oqkcxe9bjIC7ivOK+yq+0I4jI2chb4O7LL8hXyS/hLuKs3Nzi5lxt+W75Dvk
i/XHMX2iK//9jEnlwB5vMY9rcU7nFqdox6nErVyRjzUp/rwcpTzw8ZPi6MhX
OqbNOZ1b3O7+5ajkql4Uw42KIyk2EaPgTuKPbdFiAlw2fLqtWkyAa4e/JraQ
n8RVxVkVK8mn4rLiqOG3pTjNXcOvwifDMcO9wlfHdcV5xZXHmZF/k4fzvPjX
eBu4gvxtfD98PpgWbMv+vB1bzGC/w9dS/0K/OO+47/hL+E7ynZ6HPTH2AuFv
4Jfg4OLiwtxgb2JMsaYYXCxuT8P2LWaxX0B8gPdhL5F4A0eS8y/GEGvYX3No
xh/Sr3yR+G755k+Kre2ngiXDlHEhcEj56vAv3FL8SnxOmBBsyJ4e+37sm7TX
B9+TL75Cr7ipON/8Y5iavYg4NrhD8pX4GTjcuNw46/gTcpj8c5yL+Zv/Jk63
N4s/h4/Jn+ajw9JwFuRq5WxxGeDzR+TeDu9XbksOAd68fIuP8GvlXOVa8evw
3fDx3tziITkQuSA5IbkRfXDxcHKN5T/KGckV8U/52zBjWPHlzT+3h8beGf4s
PN7eMngDvAKnEd8RpgnbhJ+d12IkfHg6h+6Rr5jGK8a1z+zWUXGl7NmxH0d8
hkvEH4Lr8YOmc9/j2otlD6t3crc11yuMBdZiv4+9f/IR8OBftT7a7M0TbyyR
5znTsPxZe4x+3vx93CD+vL0M9jTw32HYsGw6lC61h5A/Bd+Ft9rzaO/jUf3C
Z/lPcCJ72+SG3Zu9dPbnuUdz4IzgipibPwYn5qfJFcvRwqHs7ZO7tWfK3in4
FLzp9T2PsFB4sxzsSum78rBys3LYctnPDCq3jj+6ccMocEtxZHFTcRxwHeQs
5C7kHOQe2Pt9mv1n3/lP7+qXfydXCaOUh5Kngl3KmbHHcohygzhHcuT4APgy
cqIvN38YtgmzXidtmw3L/567+ZdyCnILOIFyJq9zE3GocKnwP+THcLoXbfEf
rpAcnvjJmra2rWlre5XWLp8o/8aflEswHj5BB9FFOETy6vLruEV0Et3ktnAF
YG5wOfgcLG7G5k/gnMCa5RvlI/nbchP8NzlBeUD+nHyv3JMclFwwjPWPmesP
g8Je4d+wW1g6rhmOPa69PR32drAJbMOw6Xf8EXl7+XtcG3jT31L+a8O+8Df/
nPLTg+JPwt/gTPAm2ByOPq4+jj6uvue3V4s35BLwiT/c/FW5fDqf7oejwF74
a3Jqcmn8F2tBblLO0pqAqcK+YeCwVpgMDiAbwpbIVx3refUrF4eDvEnzl3ED
8H23T/3N6X/YpPas2LsyQ7NnOBy4HK+8bh9HpQuf6oqbJuaFO9FhdBmdRXfd
3rAdey6XavGx/mwIW3Jgw7LYDLbjya64B/rbq8+msC0wQrkCNoVtsSfT3kyY
A+zhq5FVe7U/iT2AQdhnDwfSrmzvPUzIMRgUHtI0zjAujOnwhjHBg2Au9rrb
7wCLYQPYgs2a/fr3qHhhuLfToNmkuAt/71WbOcx1TMOaYDKwGTkNWJE9GNN7
McS8o8JzzmkYFKzIMbjMhq2vur6zwOomxXGH3cFI5Z5wqvG92Ry2h01gG9Zs
9ld+Vm6UzWK72Bi2Bg4CG5Fzxs1g49g6GCDO5/4NG4TJ4HHB7WA1crzwGnOa
G+cUnrdlsx8wIrgfG7Z16y83/Pem7/WHB7pm107n0/2PThWWAzNZZVB1WIqc
M3yGzWP7YFQv9Msmso1sItsIt4H9wIRe7JdN2a6NP7zF13IJbD7bD/eB7cBw
YPh8Ar6B57Fvi9flAtlMtlNOa+6m/+Ued+9qb7acqhwizGT+ZkfYD3twNx2U
TXFM2d5dMYHYAP5hbzuR85Tr1CYmF5vbU25vuRhbrI0TiBso58X+eEaelRhd
rC6/8JFJ4QMwA1gBPgwbxVZtNqi9/jtMiucnxhfrw2tgOLAbfBzxkhhM7CU3
PdViYrEwLgY85wNi30HlN7dr13dWm0+8qJ29wXXZic6dqt8YWLfZMHoL10K8
ygazxbAS8ahjYlk5On3F92J4sTtuh5jaHnx778XadD7dv1OL7XFY4AFsEFsE
I9l1UM/Es3mRP9Cr64Vl4DTBU9jMl1sdnnVOs7/mg098p+lLNtS9uUfPAsaF
0+kZepYwB3lMuAYsAocI3nBxw//ocLrcM/as2Si26vNdceFwaHBp/tbsAUwC
DsXGsXXwBr8ZwM/hy+kP72AT2UbP0LNkM05o5xdPs4lsIxvAFvyxKy4cDgNu
ChvBVsBQ5J09c8/ePbgX2AwuEJ+Qb+iaXJuYUeyIMymWFXOIxXDYxCLiMfxU
Me1hrV1sgpMpPoOvyLfhqOKGil/tRRCzil3hezBCOCC+GswD9oGrBosR04nt
cET1Vxfryq8e0+JP+VZ7NuwlEa/iK4uRXB8MBpYk3webEVOKLX/XVa7NOZ0b
9rh7u1+xuj0bYmfxN766PQv2Goipxe5y7GJtdbE2jrP7F8OL5XHsce35rHzX
TQb1Wxn4OTBO2CYuj9/UmHlY/jO+D4wJ1uT3I/jXhK8t16kNpgvblSOW64WB
wkLX6Sp3DPOEffLh+elyqHQlnSlfglOMWwxThi3Dh2G2sFr6iL8s975bV7/V
QWfT1fQRfYivDYOEPdofApOGTcNgYbF+PwGOCDv1+xDw6VmGdY/uFd4MY/YM
PItPNh1Lt/q9AKIMm/ZbAvBx4/m4fF2/+eEe3ZtYBD4Lw3RO57be4UGXNvyE
P41Dd35X3DQYF93m+6bLcGDgn0c3f1YdXur3C/weBFEWQ4mlYMBy+M7p3H4/
we9FiHnEPmIWscsfmn3BqfHbCs81f1YdnmyMsTBheQgxjliHj8HXwPnB/WEz
2A4xjlgHfkrX0/mwZvEMvizOPe69dybPIebxLmHS8iBiIrGRGEesg/+xfLNL
uDg4984hHsJHPbXhk+wTXj1+PX0qZhI77drsrTVhbbBZbKf4DT/3C03/wNzl
kcScYk97LO3thAnABuxJlaOTi7PfE4YCS/F7A/bn24O6c8ul+C0fogwjgZXg
xODGmPPB1l/+ZOmu9q7YoyGHu1RXezf0l+Nbr+EB97fx8AH+mWtwLTAJ2IQ9
QfB3+/Xs7SPKfHq+vZhV7Lpd8/fFs/jkxzd9b7y9gPb42mvk957kOfmkfovK
bz4dOVXHtMFH/PYJn5fvq92+LHtG7B2B4eNd+WZ8O36DA68JvwnXWV0+SMwu
dsfZxd1lE9lGGD2s3v4LuQj4rb0f9oDAdufwvvpl09l2dhx3EgdIfGa/ov2M
YgyxBowX1mvPE+wfJosPhC8Eq4XB2kMFV4bN2lMFnzWHueQQcP3FxGJj/DwY
NWwaX0/MI/Y5ua1vMbHY+LB2v3Q63c7G7NHG4Prh+Jlr0ch6/cpRyFXg/OH+
ObZoux752l92tfcL3os7gdsPKxazi91h+LB6NoltwqeWu5CTsadM3leuRj5G
vo1/J19CZ9PdbDrbDrOAXeDA8Qtva8eU+Yr40jg+8lj3NvHbRjjU2mAwsBgc
0SVa+z1N72/exG8jGaMNpgpbtT8eFitH5jeT/FYSfQ2zmanpZ/lHOTm5OXwn
XCs5N5wnNpqtppPsoREj0VU4VfKFhzQ8wv5O3HOYIGxQThFniM6n+/WXz9NH
X+d0bjqerpfDpOvV2Y6zmr0+sMXXYoZHG57ktzLsubf3HkYKKxWvid1Wa89S
2V5K+TLHYNKwbJwXWDUbzBbbK4JrywfgCyw6KK4sH3ezZn9cG5vENokxxZps
tucHA8PdZfPYPjGV2IpPxbdiM9gOPi5f1zfsWxaDikXtwcclFFOLrelMuhOm
Adt4uqtcAQ4fXhqMA9YhBhALeEfeFbxg/+Zv4ary+fn+3oF3gXOPe4/Tj9uP
c4B7ICYWG7MpbAt9LhaBT+HS0Ql0w3xNf/ie7I2zh9BeQjkLuQucRNxEOXG5
cRxGXEYYBCxiseY/8RdxE2E0sBqcRtxGHF65URgWLAvmBfuyB8PeMXum7J2S
45TrxHnEfeR/i1/8noM8Eh+XrwsThA1as9auPWD2YdmPZW+YNnlf+V993KO8
JBzGvcOoYFVXtudp/7a8kBhALIDDK2909rC4vTh0eHIwLlgXDgcux/u62nvo
eZ/Z8GrcDxg43BWOAduwh8neNpgUbAomBZu6pz2vJZv/y3/G/Vum+dv8XXvj
YFSwqj+3dhgVrAr/yl6UNzf/Vk5qz1a3FxjGBeuCd8rtyPHYy4NjhjcG84J9
4XzhfvkNIPkNHLF7m76kN+XDjm/xM/+C7sPV8xtodCAOl1zQE11x19Rx12Bu
sDfnk3t6vPnnOGXyNz5t+RaYHGzumXZ9OFC4UPB63HIYLaz2L+3+5ODk4u5r
z8f+ebyT6X3M48KIYEXTPJZxPV9cSpgibBGmA9tZv6v35X3aOwrTge3gpOM5
4W7hqnuHuDJ+w8y7hW/hwuEEy3/Ai3CJ/EYJbg/MBfZiDnPhz1w9VTwbfBgY
IawQ5gJ7wfHC9cLhwuWSb5Rre6i9XxxcuVg5WdxcGBwsbnqf6LgwJ9iTnMb0
b4dMivtkT5ljzuncuD3T3JxJYVPsDf1mTnPDbGG38tX2T/Af4L0wF9gLH5Qv
yh6z5XjTCze7LveMQ+2YfOBv2/Uf1eyzvO8izRdQlguWs3YMBgQL4jPznfks
zu0a7OWAecG++Lx8Xzk3uTccxOm9WZPKJdtvIHcOE4WNihfgIWw4Wy4P7PcZ
+ADW9k1N3/Fh+DLy1n7b4YCmr+xB4F84po0Omv79vEn5WnLQctH8JdwI+xfk
yvlMfCc5fNcjRy1XzSfjm7kG10Ln0D3yiXe17/fI1t/7hvebH74v575Gv/ZO
Ww/HtfnlA+Swz2vfKl/njPY94ljKxcoXyA/Yg2kvJv8Mf+D6VqffxNM4GrjE
9iTbIwfzh/3P1q7/mqav5Zcfbvrk6Kbf+Yty/HL91oxcAc6DtWTPhlw7nUq3
it9xKXAQcEPkLE5r51eXo5bL9vs+ctdyHHIdP27Xd2rTJziz8s180mObP3tA
Ww+eD5+V7/r/APIYyoE=
           "]], Polygon3DBox[CompressedData["
1:eJwtlXtM1WUYx99zzu+c37EyBewiUYEg3sCViFyUkgySm4QrdWkKiG4FehiK
E4XsspUryWyFoHjkWMucWal/VeuytVWb0m32T7aV/ZtowwtapH2+e/jju9/z
fJ/v87yX3/u8b0ZjbOnGoHOuBYTBdd+5Uc+5eMC5Vvy5EeeWRZ37Dy4Bdwis
Q1MFHydeQvJ+Eu9GMxn+IfyD8OtC+HAVYAp2LVw5ue+QtxjufrgKuIfhEnA3
yJ1Pnd/wz4JO/BywmXrfonsP/TzyukAM+wO4lcSmo4mTn0oOtEvA/QyXBxfD
T2PexWGr9xy5n2GvRjNIrAnNk+AY9kx0nxLbi+4VuOtwfNw+tIXknca5iOYO
8BZjDeI/AY6imQH3Cbk95NbADWhd5PWHbQ+uwT2KvYYJthMrxI+Sk0edF/nu
AM+DGvJnwxWiuUJ+Cbm9cH+Re47cb+DryQ3jH0a3xdkeai9Tta/Y92Ef9WxP
y9FdRrcPfj9oIDZMvbPUzsSvJlaLvxNtETl98AzprpJ3Ef4CiBErRfcu3z0h
q9MPCtC+gS4F7jFnc9H50DkZ8Oy/am6KJaH5m1ofwlfAV2ue1Msh/1f8Xfjd
oAbdaXTnqT0V/3Zir2odcAXk7oXn4y6RNwSXjr4SfyG6Jfh9yiX2J/x38I3k
rmdBm+ByyT0JtwJuiCId5DToP4EbxAbQHATTiJXix7GbQrZW7d81zVtnh/yv
8BehSeBvo34fXD7xDXx/ZA4/gQbfxlHtm6AOXS5cK/Yf5M8m1gO3Eiygznny
lzHeKvx/gzavApAL3432OKjEvtWzffwIjANz4V7i+4JnZ+kkqIK7bSznBEhl
3EJqfkG9LPx2xuhhrtuxPTAPfnzE9qkNtIIc9FMU1/4xr+NopsHt8q0XtgVs
D7XGEd/6/Bj2YrjH0WagSQNVstWvnv2jFrhzOi/UGmKcXvJ2w5fjf60zhLYT
rh4swd4Nl01sApodvp1pneN6sBrNobD9h+nUfyRo/7ABvpZ4GWNNJCcJNMG1
wx2h3iR0d/p2D6lXynR+1Efo10TtHOo8TkU3Hl01XCZcPvZhNO+DdN/OSBw+
gbY2Yndncsh6Qn3QhN8Vtjqq1wu2h2xtLZqzegiuFN0B8vtBMhiBX4imDftj
4m3kNIdtLreob+AC1G/WmYC7Qmwc3D+6W+CKovbPD8Bn438J30HecNju+BFn
/VSgexhdEeM9TXwrfgcoBkNws9AlszevEVsKl0LOm/gXPDvPUfiZaG4yv2f0
76mVCVen8zR2Fut821PNP4uar6tf4e7y7Q5Rf6nP9H7MgcvHzwnY2fwePy1q
d+tTaE8RW0v9M7pj0UxWf3n2HjXD/U58U9Duy7fJO+XbvJLQZhHz0OTBFWM/
ANfljd2x8A/iF+kNhPvBN64TOwLmw09Uf4AT2JuZ74aw9YL6SD2qXr0ctDmr
f2JgI5gFl+HZevVOZmJ/jnar1hCx3r2KZoHOJf4gumfhUqiZrTcoYnfECsZc
HrI3sgvNvXBHdF+iWUX+DLiX0Y7iY7pR3V0Ya9E1guX6V+gmwaVgl6CZE7B3
54z6Svc7XLpn8+72bTydWd3Pepc1tt6ySwF7V9SLwaitW+vXfboF/hdqpJF/
D1gE1ut9QldJbg+aYTRlYevf/wGkVvZX
           "]], Polygon3DBox[CompressedData["

1:eJwl0rtL1WEcx/FHPXkkkDIkNc0oiDAJJ295hiDl0CBEoOBgF2nKztEhp7xM
DQ2iEqKY0hAtov+AzS1n0MHd1cvRLIo0Ten1cIY33+/v/Xx+3+9zLjcHhp5k
i0MIdShFoiyEzIUQGsgbiRBe6y8lQ3iB754r8aEohEP1iOvGmD6JJn5U3eAO
sKJPcxfVVXy2oMf8U/0SX6WeYED2BK127fDXuJaSEO7JH2GPm3W3H+pDmX4z
enEu94mrVv/hpRk55N29Qf4Wyp2/N2OC7/JuvdxPrlNfbMZzfo+rwDSfV/9w
jRgyZ8uMb/jiPs3y9ViLd3DWKPtVf1d2IX5mfRM34mxfPydbwy/qb/MP+CX9
CJ8rLey6ghl799XHfFq+TX9m36m97fG74saThc/+lH/Dp9Qi+bOY53fN6OHa
9b/NfodjufjbOgrzmo+ytd7Jyi1zOfTxd/hn2LXrMia9sKP+4vrkW+UzsrWJ
wq63fAc/GP8Pcbj6Co/4YXunuAVc5f5inUvFd8zpx6GzbaTjHZOF/8Ci56xR
s+omf87ftyvv+brzlH6M+w8GmFaK
           "]]}],
        Lighting->{{"Ambient", 
           RGBColor[0.30100577, 0.22414668499999998`, 0.090484535]}, {
          "Directional", 
           RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], 
           ImageScaled[{0, 2, 2}]}, {"Directional", 
           RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], 
           ImageScaled[{2, 2, 2}]}, {"Directional", 
           RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], 
           ImageScaled[{2, 0, 2}]}}]}, 
      {RGBColor[0.880722, 0.611041, 0.142051], EdgeForm[None], Specularity[
        GrayLevel[1], 3], 
       StyleBox[
        GraphicsGroup3DBox[{
          Polygon3DBox[{{1468, 607, 1068}, {995, 632, 1520}, {1134, 278, 
           1027}, {1022, 254, 1083}, {1470, 608, 1069}, {1132, 277, 1026}, {
           667, 253, 1082}, {1072, 631, 1519}}], Polygon3DBox[CompressedData["

1:eJxNmFmwkGUZx99vm5pS1mKmJlYTEAdKtgw5WEAeoBrgYGZIUMQmAwbGkQMy
040BgdhMM8IBD10gcg5ELskudaGsXhSb5EwBCnJUZsIVIi+y/8/nfwYunvne
/XveZ/0/b8/pv6x7KE8pbc1SKvV9t0rpHdHZIqVzohZRs+iyxt4TXapiDXNv
iDaLnha1auxt7+XAMynOmKFDfyGaJZpdxpqFmj+Qru/dJLpYxRlnRWdExzR2
XDRHezqIt/aimWr/S3Pztf9l7d9YBE+L1T+agtf31X9Y/fPqX1D/tPqviQ6p
fbiI9inRwSLGOKNJ9M8qzubfc7X/9RQ8sHaW+idT7Pmd6AnRCY2frIKnGb4b
vF7U2h5a+8Us7t1f9Df1p2v8r1q/UzRG7bGi3Wp/qvm1WrtOlKn/kfq/VXuV
6Cqyg0ftv6r+OM2PUL9B/S3oS/03tWaR2vWit9Qerflfa/4l9btYnugDmXG/
J0WD1R4iWqf2RNGVLM6/V+1a0b/VviwaWwVP8NYoKqq4+xp0U4UMhqm9MMX8
Nf2/ncY2q/2MqKPafZC/2qdFt6n9A61frfWvq99P/e6ifVnw21PtOs3/XvOt
6g9V/32duTILmSCbOzT2jyz2D1a7RnQxi/XfqeKf/Bv5fAlZ67zHdN6r6vdS
f4r661Pcb6T6XUV7s+ABXrBpbAcbwta558w8bABbwCaxbWSKbJeKpyWiD9X/
SLSF/4taRFvd3ixq9lij6C6tGyZaq3aD9i72GW1n9RUvg1Kc+WfRC6LfaHx5
Ge3nRY+V18eGan3nFGu32r5qzUuj5odr/quaP+x/YgPrzMtTmt8g2ij6g6hJ
dKfWj9D6m3XXl9TfJ/q62rcW0R6t+R+mGNuj/m6vYe0l/eNd0U61d4n2iyZq
/QTRXv6juSZRvdqPlLH2HdGO8vqe8VrbN8VZ8DRC/ZoseD2ksYPcQ+11ZdyJ
MdqNvst634M7XXa8QZ/EhuEEOZ31qT7D4E00QTRJdG8ZMQLfJwYQOw6Kfp6H
/x5Re08RsQB7eLWKuPFgHuvPWK741lDRerUn68yfiB4QTTHdlEV8mOx/jxfV
3cDD5zX3uSx4+x7yFtWKxohWi1aJrun8/+bRvh1fSDH2uNcw94n76PNb+FAZ
cZZYgP0Sqxlb6T2sxYfwJXxwchH/HiW65wYeSmJBFrzhQ98VPVCEbw0WzU4R
v1rLiPHEeuLddvsB9j9ctK0Km9hj28FWdmjsPs21aM/8Ivb8sYo8wVnLbffw
DO9/sX6e0/qFRdAC0f4q5tAZuiMG7yriLP67ybkHHR4V7S5Ct0e9h7WMwcM8
0YtV8LZHdL/O+7FoVxVETN/tOb5jnd/Im+fE49ky4vR59K/5m/OIScSmE47f
vxIdU/uC4z8x7w1igtYsIVdp32FkI/qRaI7GHiwifvQjtmbhT208NDt3oxN0
s0JjK03Ef2Igc/zjnHnj31M1/9Mq7szdDzv+7UzBC7In9qywDuABXohzW8zX
7CJiHmP4AL6wP0We3W75jHGs2uq4iF62+wxi19Mpzt7gM5qcq4kBxAJiWqNj
wFr7PL7faB9kzwYTtobNMbcKmxc9LlpDPjN/+Oxq28Zw44tNlh1+sLwKGWJz
+BIxF1tssU1v8x3QVUMRcQOdEW+J9eRwcvmatn8bRzA2vYiYzNrV5rGNN9Z+
0/L/bE/bnLEIuiotL3SGTdXCdxW2hq2Q12dbTycdr9AH+/FdfH6y77pI7Z6a
7yVaXIVN1TtHNTg+77TP4ruHRNMki6miA9iD9vTQ3mdT+OHcKsYW2DdZ84ro
oPfyD/51i2gpfIq653EG+7A57o4MlmGLom55rGEtNg72wyex/RdtP9gXfonN
oEt0usG6/0Ye5yFb7rLDOYw7oecBeaxhLTwTW+Dvs7sUIWtkji/iI8Sqdnn4
DnIv8phHN8gYWWNj6I4zbrF851RBsy2juY6H5EpyILIGg4FV8FfsBAzI2HTb
ziT/D8wH9gMf1hSB48ZUEVP+LjpeRqxhDLwHhmTtB2VgLLDVx2XYClgQe8Vm
OHOUqK6Kf10pAw+CWT8sY25kETiSNZtt7/gbfjHL9gTmA/stsz0j3yVqP1qF
3hsc5yaKJtgO67E/64N8VOf9j9rPsI0WeADLgfnKoGdEzWXMLbW80SH/qPM/
2s6GhwafucztxeaJMXj+fhF2x1226cytoq9prGsRbfDJPSnGWvxvxlmLTCba
B/HF++yv6GySdVRrnY6zjOtuWIuM1/r89jr/Yhk4f6Dag4oYa2c9spY2uA2d
MkYOZs8g5+Zx1i82wL/JTeQechA5ihoBTAOWAd+CTcj15Pw63xte4InaBdms
SuGTyKjZ8RmZIIM7jQfA6GB1aoRG1ztX7HvoDh3ig72x6RSYcb/9kjkw5z7f
e1qKGoBaoL/6U1PUGNQat3k/mB5sTyzEN5A3vnm3aEQVcW+kCf+i5mHukGPT
YdER08+yiHHMgfHB5fgUvnWqjNoL+Z2wj+FrJz3H9+EseITXT4zbyLnkXtrg
trPl9bGVxt+shQ9kwZ242xHzRruf7XiRbbbB9oxv4TPYNzUkWAwdoAvk/x/R
t4uo3d4y/8gU2TJ31XpjDbKqcY5AZh87Vlz1OamKeo96AH84ZnsCjyKrVv8f
THPBGOO8bZK5K447nAVvxC7qSfSBXxBbiFXYK35EzcG/+Ce1Jrl/qPEtGKC9
7RP7o3YgThI7wTxPOs8RS5DPcscdYgMYkpw9r4y3Bt4c5peBfakVqBnAwOCq
AylqCmoL6g9qKzA72B1sBBYDk60wLoE3MDg1CWPMgdnB7ugYXTMP/n5Z/U4p
fA7fO6H+V1LUA9QRf1L/SgqeRtnWFmZhY9ga9dVN5pdaZ57zFTmR3Ege75NF
jUmtSV4mV0/LAzOT63tnsWax7R1dwi/1KTmB3ECMJ9ZTc1J7Eh+oDdY4X4MZ
qZ03Of9Sc1B7HPR6dIbuqP16pogBxAJs+v4UPnfEuWtBFnc8bt8kP+IT+MEp
yx88SNwf4PiATeN/xELki08RE8kt5CJyEn7zvOWFztAdtekXUsig3rb6pmMu
Ngt2Ge96Fl4u51GrMsbca74PNR613nvq91e/i/oPlaFDdIm9UBM2GR+AyYi7
1yxvfIiYcMnnY4+8L+XoL4WNYqvEIt4KkBGyQgbDXS8Ti7vaX4if5CPepKg9
4Y83uTYMDXYGW4NhwDLUKODHKcY0YBnmeOeaZb1Ru/OmRX2F/1BvHdD3lTzq
WupXeGYPay+5ZqJ2osajnmItNo+ts4c3QOyE2pR3Rt4LW93mPYZ6jdob+6I2
4QzsGqy3y2uo9fFP9iLz+dYTuoB37o6OuMNky4M3u5N5ED6HnphDR+gKG8PW
8HHqdN4c8P2Zjhfo5O08ciS+gI1j64y15vFGyFravBGihxk+iz2s5Ux4Rdfo
HJ55g+BtAfsAu0O8u/GOedpt/OyUx8A/I30/bBGCb+yCOXz4dscn8Dz1BrUP
8ZHakBqHuAj2pQ5pG6PNWmIq7yrtjD1oN9nPGMPGRjufg4UecTzExzY6J9Xf
kKt4QyDWEfOes06pm45a18Swu+yX7Kf9vxQ+ytgwx2di4lN5vFEQp/HrF4yx
wdr4O/iNGMUa5ohdE+2PxFhsFx6ezePdA95oE3OJtaN9dvJ9+Ae8kjeOmGcw
C28ZvJWBZabYhk5ZF8NuyKt3G9994BxILhxsXDdQc4Mqt4vAOgO9h9xIjuQs
1lx0fh/ss8ndNcY5eRXvoeRLcjVvprydEgOJhYyB4zKv5c11SBUYGazcrQoc
xdtoD89xxgTj6L5VYDFiLrG3cxVvqeCvDlX4HHZMbKT2QwfgRGoedNOGkcBG
A4ypwZjwlPzPo+SCLHiBR3jlLZr3b/7RXtSpin9zBmeBBeGNN2fensGoYNV+
HqMNtmcvOKKjz4BHalliNryvdM4mV/NGxhsy79S1rrXp87YMj/BK/gKbIbNu
JngnpzHHXt66waS15gd9IMO+lj/vb+gU3fKG/+Uq6ixqMdq8a490XcaePr5T
P8/x9g1mYk3pPjaQW0adfGYXtzt6H2PYLRirneWKDd9qOXWwPrpbBr08ttf4
tLft9g7byBDrqdH2Crbr4vtjI52tQ9bUuHYdZDsfYln8H+PzVbc=
           "]], 
          Polygon3DBox[{{1082, 253, 1022, 1083, 1084}, {1027, 277, 1132, 1133,
            1134}, {1469, 1468, 1068, 608, 1470}, {1519, 1518, 1520, 632, 
           1072}}]}],
        Lighting->{{"Ambient", 
           RGBColor[0.30100577, 0.22414668499999998`, 0.090484535]}, {
          "Directional", 
           RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], 
           ImageScaled[{0, 2, 2}]}, {"Directional", 
           RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], 
           ImageScaled[{2, 2, 2}]}, {"Directional", 
           RGBColor[0.2642166, 0.18331229999999998`, 0.04261530000000001], 
           ImageScaled[{2, 0, 2}]}}]}, {}, {}, {}, {}, {}}, {
      {GrayLevel[0], Line3DBox[CompressedData["
1:eJwl0EdSAmEQQOFW2XkKjmDAe8gRPICuxayIBAVU8IJKUJKACd3w/eXi1evX
U9NTNdm9g/z+SkTsorAa8cxHfIwTvOhTPsM5OvqCL9E1X3ER1+jpEm9lIm7S
u2sRfbsOd9HDq+4n4y2hBzzEwDziMSZpp3NuVdza5jKP7G65hirGus53mJjv
uYkG3nWLH/GAqX7iHbfa6blvzOzmyZhirj/5I2H+4W98JfQf/2KBdb3h1qFb
m5n//7cELzQ8Nw==
        "]]}, 
      {GrayLevel[0], Line3DBox[CompressedData["
1:eJwt0D9KAmAcx+Ff2hTUEBS0mC3pkBB0khzKScUD2J8lD9DUFbyAS7VVs2lp
Q6RStJihVCdwTHqEhofP+33BF3WrcpSvLkTEPvVExFQv9YprVu2m3tNiw+7r
gLTzl37zQ8ZOLEaseTCp65pzV9QSZQp2R7s8cW4v++wKDecDPaRA1z7TXW/V
dJKMGLv71BEfDO2evvDu/KgPtBnYd3rLDc92zltlb+1oaf473aV1kxQX9pvv
9UrR+VRPOGbPzmqGbZbs2Zy3f///vz/Kii2u
        "]]}, {}, {}, 
      {GrayLevel[0.2], 
       Line3DBox[{278, 1134, 1133, 272, 1128, 1127, 1126, 268, 1116, 1115, 
        264, 1108, 1107, 1106, 260, 1096, 1095, 1094, 256, 1084, 1083, 254}], 
       Line3DBox[{294, 1141, 1142, 297, 1156, 1157, 1158, 310, 1174, 1175, 
        1176, 316, 1189, 1190, 322, 1204, 1205, 1206, 335, 1219, 1220, 350}], 
       Line3DBox[{352, 1224, 1223, 337, 1212, 1211, 1210, 324, 1194, 1193, 
        318, 1182, 1181, 1180, 312, 1164, 1163, 1162, 299, 1146, 1145, 296}], 
       Line3DBox[{368, 1231, 1232, 371, 1246, 1247, 1248, 392, 1264, 1265, 
        1266, 406, 1279, 1280, 420, 1294, 1295, 1296, 441, 1309, 1310, 456}], 
       Line3DBox[{458, 1314, 1313, 443, 1302, 1301, 1300, 422, 1284, 1283, 
        408, 1272, 1271, 1270, 394, 1254, 1253, 1252, 373, 1236, 1235, 370}], 
       Line3DBox[{469, 1319, 1320, 471, 1329, 1330, 1331, 485, 1341, 1342, 
        1343, 493, 1351, 1352, 501, 1361, 1362, 1363, 515, 1371, 1372, 525}], 
       Line3DBox[{526, 1374, 1373, 516, 1366, 1365, 1364, 502, 1354, 1353, 
        494, 1346, 1345, 1344, 486, 1334, 1333, 1332, 472, 1322, 1321, 470}], 
       Line3DBox[{542, 1381, 1382, 545, 1396, 1397, 1398, 558, 1414, 1415, 
        1416, 564, 1429, 1430, 570, 1444, 1445, 1446, 583, 1459, 1460, 598}], 
       Line3DBox[{600, 1464, 1463, 585, 1452, 1451, 1450, 572, 1434, 1433, 
        566, 1422, 1421, 1420, 560, 1404, 1403, 1402, 547, 1386, 1385, 544}], 
       Line3DBox[{607, 1468, 1469, 609, 1477, 1478, 1479, 613, 1489, 1490, 
        1491, 617, 1499, 1500, 621, 1509, 1510, 1511, 625, 1518, 1519, 631}], 
       Line3DBox[{634, 1672, 1081, 251, 1671, 249, 1862, 1079, 247, 1669, 248,
         1085, 1086, 1087, 257, 1097, 1098, 1099, 261, 1109, 1110, 265, 1117, 
        1118, 1119, 269, 1673, 273, 1129, 1864, 274, 1675, 276, 1131, 1866, 
        662}], Line3DBox[{637, 1685, 293, 1682, 1140, 290, 1680, 287, 1677, 
        1137, 281, 284, 1696, 1155, 308, 1693, 1692, 304, 1149, 1869, 302, 
        1687, 300, 1147, 1686, 301, 1165, 1166, 1167, 313, 1183, 1184, 319, 
        1697, 1195, 325, 1698, 326, 1699, 1197, 328, 1703, 1704, 331, 1203, 
        1873, 334, 340, 1215, 1876, 343, 1707, 346, 1218, 1879, 349, 1710, 
        660}], Line3DBox[CompressedData["
1:eJwV0EFHgwEcx/F/qUb0AkaX3lCHXsCikVI2o0NENqJDidFlJmKniNKMiZam
2TIbyxhjjA6JvYHs0qfD3/f7+z6Px2xjJ7uVWYiITZdfjKivRGSFGvaXIg55
le/jI3a1NN91LfscmzjRU4mIM/vVHtsF/sJP8RlH2jE/cT37Grs404v8g3fc
Ff/Rtn3vgn/zSyy5vue/dpkP+Ke74fP/3+X9Wz7UKnjnEssRe/o9H+kPuKod
aE98rK3ZGbtmT+w6NlxSz+lvfKq/47p2pLX5l1b0n/0BxDg0BA==
        "]], 
       Line3DBox[{642, 1769, 468, 1767, 1318, 466, 1766, 464, 1764, 1316, 460,
         462, 1777, 484, 1775, 1328, 1914, 482, 1773, 1326, 480, 1772, 478, 
        1770, 1324, 474, 476, 1339, 1917, 1340, 492, 1780, 1337, 490, 1783, 
        498, 1349, 1919, 1350, 500, 504, 1356, 1921, 506, 1786, 508, 1358, 
        1923, 510, 1788, 1360, 1925, 512, 1790, 514, 518, 1368, 1927, 520, 
        1792, 522, 1370, 1929, 524, 1794, 654}], 
       Line3DBox[{645, 1804, 541, 1801, 1380, 538, 1799, 535, 1796, 1377, 529,
         532, 1814, 1393, 1394, 1395, 557, 1812, 554, 1411, 1412, 1413, 563, 
        1427, 1428, 569, 1823, 579, 1441, 1442, 1443, 1935, 582, 588, 1455, 
        1938, 591, 1827, 594, 1458, 1941, 597, 1830, 652}], 
       Line3DBox[{648, 1945, 1516, 629, 1836, 628, 1944, 1515, 627, 1835, 623,
         1505, 1504, 1503, 619, 1496, 1495, 615, 1485, 1484, 1483, 611, 1473, 
        1472, 1471, 601, 1831, 602, 1465, 1942, 603, 1832, 605, 1466, 1943, 
        646}], Line3DBox[{650, 1828, 595, 1939, 1456, 592, 1825, 589, 1936, 
        1453, 586, 580, 1824, 1438, 577, 1820, 1819, 575, 1436, 1817, 574, 
        1816, 573, 1435, 1815, 567, 1424, 1423, 561, 1407, 1406, 1405, 549, 
        1805, 1387, 548, 1806, 550, 1807, 1388, 552, 1808, 1809, 555, 1390, 
        1933, 530, 527, 1375, 1930, 533, 1797, 536, 1378, 1931, 539, 1802, 
        643}], Line3DBox[{653, 1793, 523, 1928, 1369, 521, 1791, 519, 1926, 
        1367, 517, 513, 1789, 511, 1924, 1359, 1787, 509, 1922, 1357, 507, 
        1785, 505, 1920, 1355, 503, 499, 1784, 1348, 497, 1918, 1347, 496, 
        1782, 1781, 495, 487, 1335, 488, 1778, 1779, 489, 1336, 1915, 491, 
        1338, 1916, 475, 473, 1323, 1911, 477, 1771, 479, 1325, 1912, 481, 
        1774, 1327, 1913, 483, 1776, 461, 459, 1315, 1909, 463, 1765, 465, 
        1317, 1910, 467, 1768, 641}], 
       Line3DBox[{655, 1761, 453, 1906, 1306, 450, 1758, 447, 1903, 1303, 444,
         438, 1755, 435, 1900, 1291, 1752, 432, 1897, 1288, 429, 1749, 426, 
        1894, 1285, 423, 417, 1277, 1892, 1276, 414, 1747, 405, 1258, 1888, 
        402, 1262, 1889, 1261, 377, 374, 1237, 1882, 380, 1723, 383, 1240, 
        1883, 386, 1728, 1243, 1884, 389, 1731, 356, 353, 1225, 1880, 359, 
        1713, 362, 1228, 1881, 365, 1718, 638}], 
       Line3DBox[{658, 1708, 347, 1877, 1216, 344, 1705, 341, 1874, 1213, 338,
         332, 1871, 1200, 1199, 1198, 329, 1700, 321, 1188, 1187, 315, 1173, 
        1172, 1171, 309, 1689, 306, 1152, 1151, 1150, 1694, 282, 279, 1135, 
        1867, 285, 1678, 288, 1138, 1868, 291, 1683, 635}], 
       Line3DBox[{253, 1082, 255, 1091, 1092, 1093, 259, 1103, 1104, 1105, 
        263, 1113, 1114, 267, 1123, 1124, 1125, 271, 1132, 277}], 
       Line3DBox[{295, 1143, 1144, 298, 1159, 1160, 1161, 311, 1177, 1178, 
        1179, 317, 1191, 1192, 323, 1207, 1208, 1209, 336, 1221, 1222, 351}], 
       Line3DBox[{369, 1233, 1234, 372, 1249, 1250, 1251, 393, 1267, 1268, 
        1269, 407, 1281, 1282, 421, 1297, 1298, 1299, 442, 1311, 1312, 457}], 
       Line3DBox[{543, 1383, 1384, 546, 1399, 1400, 1401, 559, 1417, 1418, 
        1419, 565, 1431, 1432, 571, 1447, 1448, 1449, 584, 1461, 1462, 599}], 
       Line3DBox[{608, 1470, 610, 1480, 1481, 1482, 614, 1492, 1493, 1494, 
        618, 1501, 1502, 622, 1512, 1513, 1514, 626, 1520, 632}], 
       Line3DBox[{633, 1863, 1080, 250, 1670, 252, 1088, 1089, 1090, 258, 
        1100, 1101, 1102, 262, 1111, 1112, 266, 1120, 1121, 1122, 270, 1674, 
        275, 1130, 1865, 661}], 
       Line3DBox[{636, 1684, 292, 1681, 1139, 289, 1679, 286, 1676, 1136, 280,
         283, 1695, 1153, 1154, 307, 1691, 1690, 303, 1148, 1688, 305, 1168, 
        1169, 1170, 314, 1185, 1186, 320, 1870, 1196, 327, 1701, 1702, 330, 
        1201, 1202, 1872, 333, 339, 1214, 1875, 342, 1706, 345, 1217, 1878, 
        348, 1709, 659}], 
       Line3DBox[{639, 1719, 366, 1716, 1229, 363, 1714, 360, 1711, 1226, 354,
         357, 1732, 390, 1729, 1244, 1885, 387, 1726, 1241, 384, 1724, 381, 
        1721, 1238, 375, 378, 1740, 1263, 403, 1738, 1259, 400, 1735, 1734, 
        397, 1256, 399, 410, 1743, 1744, 412, 1274, 1890, 415, 1278, 1893, 
        418, 424, 1286, 1895, 427, 1750, 430, 1289, 1898, 433, 1753, 1292, 
        1901, 436, 1756, 439, 445, 1304, 1904, 448, 1759, 451, 1307, 1907, 
        454, 1762, 656}], 
       Line3DBox[{644, 1803, 540, 1800, 1379, 537, 1798, 534, 1795, 1376, 528,
         531, 1813, 1391, 1392, 556, 1811, 1810, 553, 1389, 1932, 551, 1408, 
        1409, 1410, 562, 1425, 1426, 568, 1818, 1437, 576, 1821, 1822, 578, 
        1439, 1440, 1934, 581, 587, 1454, 1937, 590, 1826, 593, 1457, 1940, 
        596, 1829, 651}], 
       Line3DBox[{647, 1834, 1467, 606, 1833, 604, 1474, 1475, 1476, 612, 
        1486, 1487, 1488, 616, 1497, 1498, 620, 1506, 1507, 1508, 624, 1837, 
        630, 1517, 1946, 649}]}, 
      {GrayLevel[0.2], 
       Line3DBox[{667, 1082, 1084, 669, 1142, 1144, 1146, 755, 1232, 1234, 
        1236, 814, 1320, 1322, 844, 1382, 1384, 1386, 881, 1469, 1470, 1069}],
        Line3DBox[{687, 1093, 1096, 690, 1158, 1161, 1164, 762, 1248, 1251, 
        1254, 820, 1331, 1334, 850, 1398, 1401, 1404, 890, 1479, 1482, 952}], 
       Line3DBox[{708, 1105, 1108, 711, 1176, 1179, 1182, 783, 1266, 1269, 
        1272, 826, 1343, 1346, 860, 1416, 1419, 1422, 911, 1491, 1494, 967}], 
       Line3DBox[{723, 1114, 1116, 725, 1190, 1192, 1194, 797, 1280, 1282, 
        1284, 830, 1352, 1354, 867, 1430, 1432, 1434, 925, 1500, 1502, 977}], 
       Line3DBox[{743, 1125, 1128, 746, 1206, 1209, 1212, 806, 1296, 1299, 
        1302, 836, 1363, 1366, 873, 1446, 1449, 1452, 932, 1511, 1514, 992}], 
       Line3DBox[{950, 1480, 1477, 888, 1402, 1399, 1396, 848, 1332, 1329, 
        818, 1252, 1249, 1246, 760, 1162, 1159, 1156, 688, 1094, 1091, 685}], 
       Line3DBox[{965, 1492, 1489, 909, 1420, 1417, 1414, 858, 1344, 1341, 
        824, 1270, 1267, 1264, 781, 1180, 1177, 1174, 709, 1106, 1103, 706}], 
       Line3DBox[{976, 1501, 1499, 924, 1433, 1431, 1429, 866, 1353, 1351, 
        829, 1283, 1281, 1279, 796, 1193, 1191, 1189, 724, 1115, 1113, 722}], 
       Line3DBox[{990, 1512, 1509, 930, 1450, 1447, 1444, 871, 1364, 1361, 
        834, 1300, 1297, 1294, 804, 1210, 1207, 1204, 744, 1126, 1123, 741}], 
       Line3DBox[{995, 1520, 1518, 935, 1463, 1461, 1459, 876, 1373, 1371, 
        839, 1313, 1311, 1309, 809, 1223, 1221, 1219, 750, 1133, 1132, 1026}],
        Line3DBox[{996, 2174, 1467, 1067, 2077, 937, 2076, 1465, 1065, 2075, 
        878, 1377, 1376, 1375, 841, 1316, 1315, 811, 1227, 1226, 1225, 752, 
        1137, 1136, 1135, 664, 1947, 663, 1079, 2103, 1020, 1948, 1021, 1080, 
        2105, 1073}], 
       Line3DBox[{999, 2084, 949, 2180, 1476, 946, 2081, 943, 2177, 1473, 940,
         887, 2150, 1395, 1058, 2147, 2146, 884, 1389, 2052, 883, 2051, 882, 
        1387, 2143, 845, 1324, 1323, 815, 1239, 1238, 1237, 756, 1998, 1147, 
        1028, 2108, 1029, 1999, 1148, 1030, 2000, 2001, 1032, 1152, 2004, 675,
         672, 1087, 1952, 678, 1955, 681, 1090, 1958, 684, 1961, 1019}], 
       Line3DBox[CompressedData["
1:eJwVy8FHwwEYxvF3W7XGNOkv6BS7JzvvmH6x1th06jam/QUpzcoSI/ovIiJi
jNF1dBsR0aHs2iWt6LPD4/t9Hu+7ftiuHKUiIpFpJqK4HPGEl/i8GDHiG3yI
Fzi2DfiVFPQetrFrz+O53sIzvcNz/BSbeGI75nU50GvYwJJ9n/9mI2ZS5Vu2
H77HN+VjIWJFvmyfWJAdv4ms8qns8jWsYPj5S0f09YmfjP6CS3hte+U5XnZ7
o7/pef0dH/09yLb9Vh/wOxxiYrvno/kNfvv5BxpvKvg=
        "]], 
       Line3DBox[{1004, 2094, 975, 2190, 1498, 973, 2092, 971, 2188, 1496, 
        969, 923, 2071, 921, 2163, 1428, 2069, 919, 2161, 1426, 917, 2067, 
        915, 2065, 1424, 913, 865, 1350, 2050, 1348, 863, 2049, 828, 1275, 
        2133, 1049, 1278, 2134, 1277, 787, 785, 1184, 2117, 789, 2021, 791, 
        1186, 2023, 793, 2119, 1188, 2025, 795, 2027, 715, 713, 1110, 1975, 
        717, 1977, 719, 1112, 1979, 721, 1981, 1013}], 
       Line3DBox[{1007, 2100, 989, 2196, 1508, 986, 2097, 983, 2193, 1505, 
        980, 929, 2172, 1443, 1440, 1438, 926, 2074, 870, 1360, 1359, 833, 
        1293, 1292, 1291, 803, 2124, 1037, 1203, 1202, 1200, 2034, 731, 728, 
        1119, 1984, 734, 1987, 737, 1122, 1990, 740, 1993, 1011}], 
       Line3DBox[{1008, 1997, 1130, 1024, 1996, 748, 1995, 1129, 1023, 1994, 
        747, 1213, 1214, 1215, 807, 1303, 1304, 1305, 837, 1367, 1368, 874, 
        1453, 1454, 1455, 933, 2101, 993, 1515, 2197, 1070, 2198, 1071, 1517, 
        2200, 1077}], 
       Line3DBox[{1009, 1991, 738, 1988, 1120, 735, 1985, 732, 1982, 1117, 
        726, 729, 2032, 1198, 1035, 2031, 2030, 801, 1196, 2029, 800, 2028, 
        798, 1195, 2120, 799, 1285, 1286, 1287, 831, 1355, 1356, 868, 2072, 
        1435, 1059, 2164, 1060, 2165, 1437, 1062, 2168, 2169, 1064, 1441, 
        2170, 927, 978, 1503, 2191, 981, 2095, 984, 1506, 2194, 987, 2098, 
        1005}], Line3DBox[{1012, 1980, 720, 1978, 1111, 718, 1976, 716, 1974, 
        1109, 712, 714, 2026, 794, 2024, 1187, 2118, 792, 2022, 1185, 790, 
        2020, 788, 2116, 1183, 784, 786, 2041, 1276, 1048, 2040, 1274, 1047, 
        2132, 2131, 1046, 1273, 827, 861, 2047, 2048, 862, 1347, 2141, 1054, 
        1349, 2142, 864, 912, 1423, 2064, 914, 2066, 916, 1425, 2160, 918, 
        2068, 1427, 2162, 920, 2070, 922, 968, 1495, 2187, 970, 2091, 972, 
        1497, 2189, 974, 2093, 1003}], 
       Line3DBox[{1014, 1971, 703, 1968, 1100, 700, 1965, 697, 1962, 1097, 
        691, 694, 2017, 778, 2014, 1171, 2113, 775, 2011, 1168, 772, 2008, 
        769, 2005, 1165, 763, 766, 1261, 2039, 1263, 1045, 2128, 1260, 823, 
        2137, 1052, 1338, 2046, 1339, 855, 891, 1405, 2151, 894, 2055, 897, 
        1408, 2154, 900, 2058, 1411, 2157, 903, 2061, 906, 953, 1483, 2181, 
        956, 2085, 959, 1486, 2184, 962, 2088, 1000}], 
       Line3DBox[{1017, 1959, 682, 1956, 1088, 679, 1953, 676, 1950, 1085, 
        670, 673, 2002, 1150, 1153, 1155, 758, 2112, 759, 1243, 1244, 1245, 
        817, 1327, 1328, 847, 2145, 1056, 1390, 1391, 1393, 2148, 885, 938, 
        1471, 2175, 941, 2079, 944, 1474, 2178, 947, 2082, 997}], 
       Line3DBox[{1022, 1083, 668, 1141, 1143, 1145, 754, 1231, 1233, 1235, 
        813, 1319, 1321, 843, 1381, 1383, 1385, 880, 1468, 1068}], 
       Line3DBox[{1027, 1134, 751, 1220, 1222, 1224, 810, 1310, 1312, 1314, 
        840, 1372, 1374, 877, 1460, 1462, 1464, 936, 1519, 1072}], 
       Line3DBox[{1074, 1949, 1081, 665, 2104, 666, 1138, 1139, 1140, 753, 
        1228, 1229, 1230, 812, 1317, 1318, 842, 1378, 1379, 1380, 879, 2173, 
        1066, 1466, 2078, 1075}], 
       Line3DBox[{1076, 2199, 1516, 994, 2102, 934, 1458, 1457, 1456, 875, 
        1370, 1369, 838, 1308, 1307, 1306, 808, 1218, 1217, 1216, 749, 2106, 
        1025, 1131, 2107, 1078}], 
       Line3DBox[{686, 1092, 1095, 689, 1157, 1160, 1163, 761, 1247, 1250, 
        1253, 819, 1330, 1333, 849, 1397, 1400, 1403, 889, 1478, 1481, 951}], 
       Line3DBox[{707, 1104, 1107, 710, 1175, 1178, 1181, 782, 1265, 1268, 
        1271, 825, 1342, 1345, 859, 1415, 1418, 1421, 910, 1490, 1493, 966}], 
       Line3DBox[{742, 1124, 1127, 745, 1205, 1208, 1211, 805, 1295, 1298, 
        1301, 835, 1362, 1365, 872, 1445, 1448, 1451, 931, 1510, 1513, 991}], 
       Line3DBox[{998, 2083, 948, 2179, 1475, 945, 2080, 942, 2176, 1472, 939,
         886, 2149, 1394, 1392, 1057, 2054, 2053, 1055, 1388, 2144, 846, 1326,
         1325, 816, 1242, 1241, 1240, 757, 2109, 1149, 1031, 2110, 2111, 1033,
         1154, 1151, 2003, 674, 671, 1086, 1951, 677, 1954, 680, 1089, 1957, 
        683, 1960, 1018}], 
       Line3DBox[{1001, 2089, 963, 2185, 1487, 960, 2086, 957, 2182, 1484, 
        954, 907, 2062, 904, 2158, 1412, 2059, 901, 2155, 1409, 898, 2056, 
        895, 2152, 1406, 892, 856, 2139, 1340, 1053, 2045, 1336, 1051, 2136, 
        2135, 1050, 822, 1257, 1040, 2036, 2037, 1042, 1259, 2038, 1044, 1262,
         2129, 767, 764, 1166, 2006, 770, 2009, 773, 1169, 2012, 776, 2114, 
        1172, 2015, 779, 2018, 695, 692, 1098, 1963, 698, 1966, 701, 1101, 
        1969, 704, 1972, 1015}], 
       Line3DBox[{1006, 2099, 988, 2195, 1507, 985, 2096, 982, 2192, 1504, 
        979, 928, 2171, 1442, 1439, 1063, 2167, 2166, 1061, 1436, 2073, 869, 
        1358, 1357, 832, 1290, 1289, 1288, 802, 2121, 1197, 1034, 2122, 2123, 
        1036, 1201, 1199, 2033, 730, 727, 1118, 1983, 733, 1986, 736, 1121, 
        1989, 739, 1992, 1010}]}, 
      {GrayLevel[0.2], 
       Line3DBox[{1669, 1947, 1838, 1867, 1676, 1677, 1840, 1880, 1711, 1712, 
        1846, 1909, 1764, 1854, 1930, 1795, 1796, 1860, 2075, 1831, 1659, 
        2175, 2176, 2177, 1661, 2181, 2182, 2183, 1663, 2187, 2188, 1665, 
        2191, 2192, 2193, 1667, 1835, 2101, 1631, 1938, 1937, 1936, 1616, 
        1927, 1926, 1598, 1905, 1904, 1903, 1572, 1876, 1875, 1874, 1543, 
        1994, 1673, 1539, 1984, 1983, 1982, 1535, 1975, 1974, 1531, 1964, 
        1963, 1962, 1527, 1952, 1951, 1950, 1521, 1669}], 
       Line3DBox[CompressedData["
1:eJwl0L8uQ2EcBuBfh3J6ER0sQkKaLoiFxWbRhMaoF9AmKiZEaGiJJvrHZCwz
wlIrpt6HG+hikPQ56fDkfd+TL985OXOVWqmaiYgdrmciHmcjruQ4GzHQn3jm
z36Rr7zxbw/lJxnnv+Q3P2TtG0b6rVxPInJy196jzLx9KOscsWk3ZYuS3pU9
+hzYK+5Y0h/ksmx41tO7dLiw2/KO8/T9skWTM7shL9NznNiL7sjrC/JUbskc
SfrNbPDr3LFc5UN/Z18v0tHv2dYLrCXT/zcB5/8qgQ==
        "]], 
       Line3DBox[CompressedData["
1:eJwl0L9KQmEYwOHXQI3qGoLKLIUaqiWawkF0y+gGJCIi9A6a2yuswLkEdenv
UHM1eBHlUhdQQ4P0HBoeft/7cc7L4czUm7VGKiK2OM5EtLMRZdbHI77TEVfO
13T4Nd/oLXeMzE/6zJh3X/SVNzLmgVbYsKuqE+669OizwDsfDNkklexi2zmn
8+Spmy+0ZdelnuuhuzVdZYUD87Iuse9c1AKL7CX7dI5Zds1HWrRrWlu6425K
J5NvpWT+4pMCjzxwnzzHGaec8JP+/39/GPwoQg==
        "]], 
       Line3DBox[{1522, 1953, 1954, 1955, 1528, 1965, 1966, 1967, 1532, 1976, 
        1977, 1536, 1985, 1986, 1987, 1540, 1995, 1864, 1544, 1705, 1706, 
        1707, 1573, 1758, 1759, 1760, 1599, 1791, 1792, 1617, 1825, 1826, 
        1827, 1632, 1944, 2197, 1643, 2097, 2096, 2095, 1641, 2092, 2091, 
        1639, 2087, 2086, 2085, 1637, 2081, 2080, 2079, 1635, 2076, 1942, 
        1620, 1799, 1798, 1797, 1602, 1766, 1765, 1576, 1715, 1714, 1713, 
        1547, 1680, 1679, 1678, 1523, 1862, 2103, 1522}], 
       Line3DBox[{1686, 1998, 1842, 1882, 1721, 1722, 1848, 1911, 1770, 1856, 
        2143, 1805, 1650, 2151, 2152, 2153, 1653, 2064, 2065, 1656, 1815, 
        2072, 1611, 1921, 1920, 1593, 1896, 1895, 1894, 1567, 2120, 1697, 
        1562, 2117, 2116, 1557, 2007, 2006, 2005, 1549, 1686}], 
       Line3DBox[{1551, 1687, 2108, 1550, 2008, 2009, 2010, 1558, 2020, 2021, 
        1563, 2028, 1698, 1568, 1749, 1750, 1751, 1594, 1785, 1786, 1612, 
        1816, 2164, 1628, 2067, 2066, 1625, 2057, 2056, 2055, 1622, 2051, 
        1806, 1604, 1772, 1771, 1578, 1725, 1724, 1723, 1551}], 
       Line3DBox[{1690, 2000, 1645, 2113, 2114, 2115, 1646, 2118, 2119, 1647, 
        2030, 1701, 2122, 1703, 1845, 1752, 1753, 1754, 1853, 1787, 1788, 
        1859, 1819, 2166, 1821, 2168, 1629, 2069, 2068, 1626, 2060, 2059, 
        2058, 1623, 2146, 1810, 2053, 1808, 1605, 1914, 1774, 1579, 1886, 
        1885, 1728, 1554, 1692, 2110, 1690}], 
       Line3DBox[{1691, 2001, 1689, 1553, 2014, 2015, 2016, 1560, 2024, 2025, 
        1565, 1700, 2031, 1702, 2123, 1704, 2124, 1570, 1900, 1901, 1902, 
        1596, 1924, 1925, 1614, 2074, 1820, 2167, 1822, 2169, 1823, 1658, 
        2163, 2162, 1655, 2159, 2158, 2157, 1652, 1812, 2147, 1811, 2054, 
        1809, 2145, 1858, 1775, 1913, 1850, 1730, 1729, 1884, 1844, 2112, 
        1693, 2111, 1691}], 
       Line3DBox[{1694, 2002, 2003, 2004, 1555, 2017, 2018, 2019, 1561, 2026, 
        2027, 1566, 2032, 2033, 2034, 1871, 1872, 1873, 1571, 1755, 1756, 
        1757, 1597, 1789, 1790, 1615, 1824, 1934, 1935, 2172, 2171, 2170, 
        1630, 2071, 2070, 1627, 2063, 2062, 2061, 1624, 2150, 2149, 2148, 
        1814, 1813, 1933, 1606, 1777, 1776, 1580, 1733, 1732, 1731, 1556, 
        1696, 1695, 1694}], 
       Line3DBox[{1552, 2011, 2012, 2013, 1559, 2022, 2023, 1564, 1870, 2029, 
        1699, 2121, 1569, 1897, 1898, 1899, 1595, 1922, 1923, 1613, 2073, 
        1817, 2165, 1818, 1657, 2161, 2160, 1654, 2156, 2155, 2154, 1651, 
        1932, 2052, 1807, 2144, 1857, 1773, 1912, 1849, 1727, 1726, 1883, 
        1843, 2109, 1869, 1999, 1688, 1552}], 
       Line3DBox[{1736, 2036, 1734, 2125, 1582, 1743, 2131, 1745, 1589, 2047, 
        1781, 1608, 2043, 1778, 2135, 1584, 1736}], 
       Line3DBox[{1737, 2037, 1735, 2126, 1583, 1744, 2132, 1746, 1590, 2048, 
        1782, 1609, 2044, 1779, 2136, 1585, 1737}], 
       Line3DBox[{1738, 2038, 1888, 2127, 1586, 1747, 2040, 1890, 2133, 1891, 
        1591, 2049, 1918, 2141, 1783, 1649, 2138, 1780, 2045, 1915, 2137, 
        1851, 1739, 2128, 1738}], 
       Line3DBox[{1740, 2039, 1889, 2129, 2130, 1588, 2041, 1892, 2134, 1893, 
        1748, 1592, 1784, 2050, 1919, 2142, 1610, 2140, 2139, 1917, 2046, 
        1916, 1587, 1741, 1740}], 
       Line3DBox[{1742, 1648, 2035, 1887, 1581, 2042, 1607, 1852, 1742}]}}},
    VertexNormals->CompressedData["
1:eJzlvXdYVEnzBgomFDGjYgYTKAZMmEYLDChizjmLOWMOmBPmjJgQFRAREAHR
0RJQVDICipKZgRnEHBAw3SNdzX5zlrkuu+xz9/nd/cednkOdPtXVb1W9VafH
YPri4bNKaWhonCyvoVFa+HfBQKfKZvYxGDyuTc/8rpn4WG/OmMxYOT6hz0Po
+0AavyW92LTfqxdoT/8eWDfM+/TNLJzolJJ1aFcsHqkR/WibiQK1zg/4mbxV
hofp8xT6vjyNzzKPbZi+NxY9Q3puNe2iQKMJbU8cWSMr/Dybvjekcf75Gn3f
QnT9DPqej2sU+d87eJJX6s6n9grsl1RhssXuWEzXq3X98Sb11ycnRk06ZaRE
lyUTXd3Np6BWXcvPNb/J8f7MnXrX5HI85tDWYOdLL3RaFmE0qrESZau8Zxzc
rESbk54eezYaYUbU9Q4fjsjxa+Z6nePblIX3qbe/69SxB+WYJxpvSOPq5qNu
/OKQNx3e7vhDju12yWC7fXJU9JReNtj1x/iYaxbbGuyVYymF6n1r0H3zRfOp
X8LzTCV9jlpaoE8oK9KnPdMnXBTpcxXTJ8hJn+L5NFAzzwZ/c57hZP9mzP4h
nOz/Itn9QfYvnCT7P0p2Po3ZOZQhO7+mas+gxm7B6Dd2q258Mt+fbL4QTfOc
SvuN5gVlaT58n3iw+4Oa/QW/20cHye7v0rq50np9pX3ygta5Iq1v7nm2H/h6
8n3BJfJ1E9uVuvG/qp/IpY/kB+fE4pPjNdo6VFSgw7GDp276yTCOPofR93z8
bW6X7E51k/EN/XugdqkmSXIFzhXhlaFoHafT981pnF9/nb5vSuPXRfjWjMYr
dB1/6G1sOI6IrDXf9Lgc9+kN6P99lKLwc3n6no+re95SPz6mHtVIx9UDFg2W
HXuAGu2OzxqdmYW9u+zIfd9NiYYz7BMlGsMkfpN+9svOlGOnW01qTQtIw2q6
OYvbmB6TOPg3NB987iXeKPfglPUKJQ72bNNXV2OwpKZ5ZPCsC3/Ghwa/wY17
36q6Ptr+x7hb5X7+L/erX8cyNP+1bP7ww4TNn69XOFsvEK8X/Qt8vfi+o3UA
8Xrxcb5ew0jPZZmeYf9v9BxBdkPzAnuaD99fN2gfNSH5fNxbNF6a1nU4u3/h
fXfT/nrM9heco/2lbj6tGZ5iGtt3UJr2Xawj23fpbN+BeN/RukH9ovcd/NV9
x/0M9y983In8EvdHfJz7nxp/cb/n0nijv4kDK9LqLjXT2CJtQfsgjux/Fe2T
2mR378neXO+vkKWkHJNUp/1xnfZF+ckHI7U1zKR8f/B9IdInivX5jcbrisYD
aH/8bl9UsajT9fo0L4nh6ivysmsVOF7Z9uutuxnIP+8cYfxJJ8xdwsebNVc8
W2B7Q2IzINv7ha6XhOTg2+hqWTpGNyS7T9jaHhPm4/5pePlxwnz4Z8WtU5Nq
SK5JrtI4/7xTdP1O0fV8/Oj78xd+tLwieTb8zfE2HdLQwsC4vda3lxhPn6Mb
Jm/5YXdV0pfGf/e8LdjzwVh6LmOdjjsqu/tK9rD7gyvdd67F6CZV27sWjl+h
8YiC+52WvGD3hz5037m07pHfC9YdmhJOOnnt8+9ss1tSg607eNK6q5vngcdP
Opu92ywxYnYFT8mumJ2YSHyZnUB1kZ38oP1VW2QPfFyvaDsBsZ28YvsOhon2
nXie/P8usf0IG0T7UYPtR6gpuq86fFA3Lr7vfornHlKc4Eg4pkfxH+EVcrz6
xuIE4HGCXIRX6nAg9x/GCbPI3zxl9oD6ZA+vyK9o5jE/s4f8C+E/xIriCu5X
ronihPk07iWKB8ivA/c/v/M7fD+MT6+fOynJScL3xV6yezntR74v+H7wPPHW
qqKTV+H4c9oPY+7PCPzx2FnC90VHsvtmZfQm21c7JDlF9l+a4SM40L7hflnd
PFeSPhvR372i68m/w2n6/ruJqp41mJ7BjvSsTj7FdSD2v3NIzz7kZw1Iz/NE
4/oi/XP/y+OrPap2C46/8b8dyJ4pXyzMa+KZ/4VU8r/Kv+h//+r+klIewvOS
fZSPzKe8JYzymCDKCyhPh2OUr5RVzcdBHN9ai8b/bp7ylNaJx9t8vXg8xOOj
xiRf3ThfJx438f1C+SMcprjp4m/Wqxfhde3wVrPna0yW8njYj/Ca4fdUaTXC
7Z+0HlwCx+0fonE91bi3cJzjtpLwmo+P/g1ui/QGJ0lvPL7keMPtXN041xuP
b7mdPyC9HSd7d/qN3i6Rve2jf+3J3tRdP4HsUJyfTlK1Q3F+yu2tMD6fSeMe
onF19yX+CkZRfszt/xDdbwblx5yn8lTVW6H983yY81W/s/8k2v/OIr6I/Bmo
4YUK7UHECxWO/86vEf9TeD2PtynOLhwX8TyF4/XV3Pd3/EkKPe/VJap8Dn/e
FUXzNn+SX9z7htD69iX7iqD1Jb4RrMm+uF250zrOFvEtovUtzBPV3XcQ8YaR
xCPKRPyh5eqv5ns2KjF8/zxHuxN/zH8AjYeKxq1oPITGBzL5hTxlKsmPZp/B
UsRb0v0K9RZGcqxE4/y+A0Xjj2k8RlU+8PuK5lM4Lpo/hBT9vCB+Xj5frh+R
PoHrM0aVp/1jPqQv8fytROPi+4rX0VJ0PdebeZuLdSYPkGHK7mYNWv9IRv35
+zWPDJDjjB4tm896kInbR1w+Nkc/Fg3KTr6SWFeOK09e72iUnYyVDo+8u2+S
DJ3GwuY9IEedoPNw8p0c0y4tCptQOwEXLriUU6GSHKecrncgSZmA9quDP+w8
K8cdDS6YdxfkEK4V8uK/s8OSGr/U3ttRa7wSy2V7vLIZPgTzJyduuhKons8p
rvydA5v6Xvgf/md3VvfvtQ+o55GKK/8yzd+RzR/yaP4lxQNPp3W3ZesOTWnd
+XpZi3jd4srvQ/aWzuwNGpC9LVe1K7hIdlWJ7Cqd2RWosSvgdlXc+cxr77pQ
mRyJ85revGQcnIkOazrO6lw2Az96njp3JC4Aw6cEfm57VIHVP/v3XmGcgW7O
DeX7Z5/GMvF6Q8JrKnH9/dLDZToZ2PB4SH5a+lPUumgs+yxJxjWJ8eu/BWeh
zYDpz9r7hOPbShnG53PT0Pyq5GipeVkY3avq6kPB/jjn6YeIW9Zy7LYyf4j+
UiV27m6rZ+0RhQ91rNy7X1Tg3umy+t/SZfiw6cLLvY8F4qkUiHORKLGB2SSN
ClPkWPtzTL8ndU7jo5ykAXeF/d35aN9vmw/LcfehswdmX4/C5G91+3ZxU2C+
bakGFV4Ift+01PzPgpx68TVMq/VSoraTd/n9Y+XYfXOVBtofHfCSXVNr2CLY
V3TokOlC/LaX5CSRnG8kx5vk1CU5FUkOqJFT3HX5t8eVS8zDnD1TsEbYlVDN
wHS0SJ1/wni7HD+mTVtTb3Y6vn0VUmG90wvsdsqk6pHdmdjW8bym9tgXqLg3
eL571wx84bl/WdZPGdoverImp7pgn91uvy1tnoQ2Yd3uG7SW45KzyZ5n9sRj
ksv6bfL0DHyz6+Ebw8Q/1+94XLfD++j67UZyNLJUHu1rHIUnHoXuaLtJgThl
r++Pesloc75L2+ANiZjU8Ua2zTRh/X8s/TEsMxoXVek1/dAeGVq5v21a00eB
ixu3V6bUykANl4wmoxMj8VIlLXMd38wS039ulaOLmw5TYprZLP8jPYdKPLOG
9tANV49vmzY8tzjyP3joebupdcsDJWcPovUCvl7q+PBFqvoB5xLWj4Lsqiaz
K+hLdtWC7Ceb2Q88Jfs5QfaTwewHVpD9zCf7SWH2A9x+tpGdGDI7gZNkJ1Ky
k+XMTiCZ7KQO2clCZicwkOxEh/CqDMMr2Eh4NZnw6hPDKzAjvAogvFrG8Ara
E16VlN5GEg7PYTgM5wiHFYTDUQyHgePwCcJhbYbDsIJwuJsqfoId4WeoKn4C
x099VfwENfgJavATKhDuSQj3nBnuwfmi8RPU4CeowU8oafwMPlH6qN+R0Xhn
+MJNPwXc9ntSJ2x/khwPxE6zenrEAndW2LFHb5YScd+3rq4+/L79peK6xhVJ
i4fyz65ohn2Ctudm4IzV+86u7qTAK/nRHxqXPoUVpS10TQYqUGme1+BTdgbJ
OS3NpLrJWOIBlJ/DrZt7GaDHwaqDZgv+4ulwidkHQf9b414sbO5VDbvutPPd
uFWJVwcvHHvpEJ9PDWlx6yn/9vg/rdf82+PhpWZfsrC4h9VtQ7Rc78rQJ/NF
u4/PlWjSv+HLBtM88bVV8IuqBpk4cHP5Mi3LcR7SW2pI9aNnxBcdCUk2imx9
D9smVKwB39Nw0oFK2daGLzGmxszrPU090dRswSVHZRp6Xy8TU38pryO4SMV1
pdEeWhWdQsNxmswt4r2HAnvr9lkztK0cO5sfO39c4y5e7Jg0yKaHEu88K3NI
v5C3v/enOlTDFWW0wzUj0DO6SwX3OAV2PiTXvPRdhsF6Yy3TO9/FyfNN198Y
q8RJD8df3jP/DzniuhWXc53kdCI5D0jOFJIzXiRHXOdaMF8y2djvAZrOqbdt
6vMMPPxgjY3TnUyslTTbYVWMD25btGdU6CAFRhiVHrYhkO8LPymvG1/9TV2s
uOP6Bf/mSytT3WwF8ec1fg1vypOuF9XLzgyxqz2rnhI/b586d6jTWZSalPe8
LuBwpYLvFdKNVAfzJ17dsPqXHw+WKdFF+r7ft47XJBoOIU5bLskxOPDNkgqh
aVjT7Gm9dnUFP3N0v3+/dkosWyAnTbqJ5PiRnAqVa9yeUi4VE83WrSt/2hXB
PX3rh8vZGHO9ehfnutE48sOletWqxaLF0gEfVxu9xlIFciKk0VRnG0B8Pn6y
3nforQyfHnRLmr3EXRLRqn3gTy31fN3f1WdVqkssJ31yvc3fUaA34HqrTHqj
5wVfel6un4ZMP1BapJ+tdP0NkX5qmRfoB7h+Ykk/E5h+oI+KfqKksVT3sCT9
7Kb9m/eiYP/CVtq/IbR/67H9Cw9o/2oWyLkq1aU6iddv6oPFHb9PuJS8sQCX
IJlwqTnhUhzDJZihgkvXpM2Jz44nXBpJeDKD4QmYEZ6YEp44MzyB2yI8Edcr
axIO3GA4AB0IB6SEA9MYDsBYEQ6I65u1RHI6kpw7Ijnj1MjhvPpswpNODE/g
COFJNcKTrQxPILJoPAGOJ+fJX1syfw3jyV87kr+uwfw1pJG/Zut+WsrrrSP+
Yr31r45nURwSyOIQ8KQ4xJviEDsWh8BtURwirufuyGHxwzUWP8Azih8MnrL4
oQuLH8BdFD+UVP33d/0kYh5G3fhfrX8Vdzy3uc/Vu0csYN3uKtd+xXVdAwyq
/tJn0JCU+25HRkPdypKLv+LAZV3XXvilf79qvlU/59pDt4YxpzyF+K1v/v6d
iwR7mHEyTBn3zhXCrptbVcnLwA21r1X71lGBw98tmiPoGeISWZzmpFxQoOcx
pfVmCusCwzNZXBf7qnvBuoj08JfjqH+rDl7c8d4D3pmUHuIJ+WMNJh5okolB
4+5u/FJagUunrWg/p8c9cF0/ocnyABmGfK26SC9eiecqrxy718QTOkCduieE
uGjHI8vX7QRcdcyTuuW3vAdbDwfV6y7EUTZO5y5tF3A4qeGgxa+f3QH3AZNu
5gvxj+mZeTGLBDvfN8/Q7K5fOJy+dGJFtqcCZ6x4dEPDRI4hee9Sxle+C7Er
v5q0HqfED6ZLZW8FPEloam2w4XU4HMnpLD/9VIFax7XbLPohwzC6/ild/46u
T6Lrj9L1Zel6q3MrAm7d8QHHnaZBBkMU6LY++OCsgAzcqFj2fPXVB3AxL2Lo
+xcZeGDvlGMPpMXPo5uz+AGCTKMvrNjhXhg/2DF/CrF2LA6JIH/qzvwmTKK4
Qov85lPm96FR8yErbXSuSqTk9y1140vVzYiCkKCDkjp9Y/HN2dp3+xm+Rnfr
jm1c0lNg0dBq9aPHuGFy2XlxS72yiz1/Ps8xe5nfF8/Tmvx7OZonn080mw+I
53OOzQf4fNzIfoYw+4FlZD/XyH5uM/uBwWQ/xZ3/ULLnauMK7Bmukj1vIHtO
ZvYM58meU8g+PZh9QgeyzwNkn2eZfcJUss/HZG/Pmb3Ba7K3eLK3E8zeQFNk
n+LruT2fFF0vsk9QY5/A7fM64VsPhm/Qi/BtCuFbBMM34PhWXH3qGDK8Xc/w
FroQ3j4jvK3D8BY43r4n/Ixh+AnOhJ85hJ9DMsmvifCzpPzUP/U7Z+4Zl7pR
+TRsy+s1p0YtAecTDik8dTJw7pRMP727AZCwTEfR95gCtwW2HLPOOAMj3gTJ
TMIjoY11wv7pDzPRoOq1uCPCfhmZeybV8Jg/DK+VeEU5V8gDx5ed2n+xEo0z
Q6KDN4eDpvU351SNdGwYOS4+a3YWPrds3t0w6in0yD8RecwqGW/Z164YH5yF
XvGW6crrDnBwx7mW0RuV+NJt2ez9gt7md7j1oPraQHBtoJy+WMBV53pma12m
yPFyLb/zLS5FQemUXl8HXlLg/HTT5okyAb9nXOvkaecAy7N6Hx4q+K+drcJ8
lwhxVPkpq25fFuR09tNrHif4zc9ZeZPbj5Njy7F3Sum7REGZiXkT+19VoE5q
1RGvXwj2THJsfiPnE8kxViOnuOvyb4+fZzwndCL+vDfxnEmMj4Xqrxl/bk58
rA7jP+ET8efPiP/k/RvU74C8T7irdaCb78J4wNrOYPw6AzNu3tty67kMSx85
0GG1lhzqD8k2vTExCS8P8fCxbSNHG8brQhXivR2J113soJNl9jgaQg5WadHy
mAx3OnQ+HuGlwLcm7ywdc5NgbfP6nTIcE7G8/5FVD6YpsYtpxmyDJnLY1UXS
4F63KHw3vt+DJluKjwPqxok/hy8zvnrpBE6WehB/rq7fZjPjzwvHS5o/T1Zd
L+hF66Wur4brWZf48/MlzJ+L7ArMya60yX7yiT+PJvvhdnKf2QmkieykCbMT
uEh2wu0hlNkD7BDZw3pmD6BF9tCV7MGO2QNwe7AkvBrG8Aq6EF7pEl59nVWA
V9CE8Ooh4VVLhlcQRHhVUnrbQzi8ieEwxBMOjyccjmU4DHaEw96Ew80YDkMr
wmEfws99DD/hDeHnQsJPZ4af4Er46ayKn8Dx8xHh3kqGe7CdcK8s4V4Xhnvw
kXCvBeFeWYZ7UJFwL0SNnHKq+Fkox1gkp6Txk+rjsIf6IppQfdyU1bXhK/VR
NKK69lxW1wZd6pe4QHVt3tc1R9T/UHPt2Li69xNgSV1XvVruclQ0VSg19eSI
m79490qXQ6msTdrjJQn4Klm2fUWVfz/fucj6DcCM+iW+qvZLFP7dP+yXKPxe
1C/xj+VTvwf0KbpfovDv/m6/xBSyh23UL2FI9nBN1H/1d/sluF19p36JhmRX
1qp2BbwPR1fVfkBsP6WZ/UD237SfjUdkjaOvp2P1/v027zVOxS2hC8onDRP0
Oft8bZ8OL1Dq7+RgZZaBNVPih0WVEeKcZplaCzyiMH1hTicvIb7q5V/NvWea
DK841lh+9HAgvrCUdWojUeId41YVAwU8UXa+0Pj9awfsvHZW5U7rlXjT9+Dh
Y8f+1E+FYUX3Wf1pXF0f2l/tT2u4rbpj5A4HMBn/oIWFMJ+EO5JPTsJ8bt+M
Pj9yVSAYDHpi/V6Y/7l8iybWU+V46EB83i88VOYu6XvvsgLr3529r3G6DPOz
N02TVXwB8ha9cyRDMvDDzz7jsjXlaLlmmtNtx3TQa9B9mkHPVHw3Z+Iy6XA5
flW9Hvj1A+j62ux6eEPXi+YJauYJauYJfJ4i/fypn01d/xvvc1OzLn8aF8sX
2QmosRNQYyfA7cRW1T5hM9lnPtnnHWafwO0zI8D/WGLLFKzZ54eFl6kMe516
NM5goBwPEr5Ppn4o3gdl9eFl6IMeCViq0+B5PmlynPr9cKN9wj6yVn3P9G/3
jasbt6H+JAnVyY9SfTyW+pOeU528EtXHy1N/0jqqk6+i+nhT6k8qRfX/VVT3
z6P+pJFU/+9Bdf/F1J/0kOr/HanuH0z9SV2p3r6P6uz21J/0mOrtDanOzvuT
qlC9ndfZeX+SHdXJ86g+Xp/6inidvDzVx12or8iM6uTnqD7O+5N2kZyvJIf3
J3mQHF5n5/1JvO/pv9qndI/q9LuJL/cmnnw31emHE19+h3hy1ffi+0t5vb4P
1em9qA4whfj/SlSn96I6QCbx/5kq79GflvJ6Pa/TB7xlvDuv1/M6/cRIxrvz
er3qe/c1pLxer+58AHXjxX1Pv7jj//Y6Fnec8/VNiE/ivD3xR/iW+KTlxCN1
Jb7+IfFbFsRrhRJfb0P81ibitThfb/yS8U+ct+d8vcn32gX8E+ft/6r+1Z1L
oE7/fzfuKu74FuKnrClPekb50TPip8wpT9pF+VFr4qd2Up5kRPnRYOKnhlD+
143yvu8s38OylP/xvK8b8VN+lP8FUt7H+SkXyrc4T8X5qUWUb12mPKsM8VNX
KN/ieRbnlcIpT+L5EeeVtClP4jxVaeKVWlGeVInyIy7noRo5PG/jeRbnp4xI
zn+Vp9pLfnwSxelG5McjvI46+1nK8OGxB89m6KXAGZCOMDKX8/duCvOzv+vH
N7xi+ZIT9Wt/o7yDX/FPz3l4T/2pH6j/sTvxNnNEcQjvL51/M3e+olsUJhl3
vVGjiRz7vWrib7RFgaWIL+N9oyXdL1qR+o0iqc5/i+r7udRv1I7q/OZU3zen
fiP2915Sf6rvG1G/Ee8/mk59C32o34j3H12hvgV+zgOT4yLl5zxMp36jodQv
0Iv6BC5Rv1E76heQUp8A7zdicu5Jed+RF/UJ8X6BLlTfn0R9QrxfgPcdqeLn
PSnHPS6nHskxJTm8bynoN3I4DlN/QGH/Ee8ToP6Awv4j3ifA+41Ynd9P6l7C
fUf1WD1JiCdZfcmJ6kpPqD66mddLqa40nuqjHlTvmkd1Lg+qj3pRvWs01bmu
UX00gepRnagOdYbqo3ZUj5pOdSheH+X10o9UVzpM9c4XVF8qT3Ulfj2vX/G6
6hHR9byuep7qo5ZUj7pKdSgnqo+up3rUwb9ZJ53x7uynnx7peKF1/5VD41Ng
5sSK3c12CHkT8eycx+1DODC3atLhKW0yMON9j+A3K15AK99rzlqlhPjZMWJC
p8wMzMmr3GPQ5niIlNTpNzVB/TkenE/nvK9jCeND6dcMJzlPkyfCyXw1/RLF
vS9/L4fzS3z8n+JwdztF8OKmq6RZ1BcfRHy+aP5/Oh+DeH0saT6/NZ2Docvu
LqVx/FluXDuvL94Sqrcjr7PXGvrawzrJTXKX+uYiS7hfzk57lmzNUF9+X9Ck
+8Z9rvlsmOSC5BnV7W//zfsOsK5z0tdjpURJdRWx/tWdO7GF6iolrX/+fzuI
19wjsrd/Wm89weKKwvfAckX75Z/2Ib+m9yhyKa7ozPFEzTkPpakOxN+rKOn3
KXifpf6vj5vypbzfcjP1RxZc5qmQ+lCfJO+bLF3wRZrUm8ZjqA+ywN+ZRUh5
PyTFFeBOccVU1bgC3hYdVzA5GlcK44qSet4a9Wwf3x98DvR6WPpp1lHC5r5f
RpuUz8CaqyXZX3c8A0XtpPjv7dLgdGT1BxmWSmxfr/X0nD5ukDJ7WNoyeQrs
3991ioZXNven8Jj86XxVfwqh5E9H/c2+kbJUL5SR3zFXjT//dB5FTbIT7kdK
um5YgfkRoHgbvqrxI3933x0gfp+/H6lPeYS6cySKK7838+/wkvl3nEX+fRrz
41DqQ4EfR+7Hyzc5vuxUWgZ8WaWtL9kfjwm7+o1bkSjD5vQ+T0Xi91YQv5dP
7/Pw93skqvwePCJ+r1MJv9ejw+J/UFL8f5Pi/zzq67Wi+N9MNf6n/eUlvUXx
/0zq6x1GcTtQ3M77ettT3O5PcTs/16JAzKZ7heda8H5c3p/L+3t5Py7vz+X9
vap1+XtS7kfEcjqqkcP7e3+I5Oipxu0wu+i4HaoVHbeDOG4nfg+uivi9ytTX
6y7i9/i5HLzPd2wJ9/dS/A+Lio7/wYHifxeK/z2pn+w5xfPtKZ4/R/1kPJ6f
QvE87w/j8TnvE+P9ZDw+L0Xxebzo+je/uZ7ieRDH87yfjMfzvK+M+mUhiPg3
3jdL/bKwhPg327/ZV7bHO9+ifJsoMPvQbucBQznsOrMhfdcmBQ6h/gMr4qO6
Eh/1g/oPNEV8VHfqP/AmPqqk+xB2EU5yvoXXQ9Wdc1Jc+Y8ZbwNPGW+Dp4m3
WU7vDfah+sgx1foIJFF9pLJqfQS2UX1kDdVHHtB7gxKqa+xVrWtAONU1GqjW
NaBG0XUN2Ft0XQNuFF3XgD5F1zVgT9F1DfAquq4B8C/VNageAXuoHnFDtR4B
auoRJO+PegTVEUBNHQHU1BFIzp/qCIXzrfeb8b96DkzDYo6XNI9N/D9caV4k
/w8rRPw/8fnQomg+H9oUzef/Vg+/O6+mpPRA/DzMKJqfBwvi53cTP29MfUsH
iJ9vQfw88ergIeLVXahvaTnvYyJevRT1LXkQr75AlVcHNbw6cF79kyqvDq1F
fDiXE6JGTnmRHOLVwfhf4tW/s3o3VGL1bjCjevfrr3Vad6ifABsezs2/+UYO
67YvdZhQSf06NnaXL7CXZMBt60dOO3q8QNN9lsO2l5WjnOr3Zameb0Z1/ASq
3ztTPV9KdfwuVL/PoHq+H9XxB6g550fduLrzf8TjIb85F4j3T9ShfooX1EfB
+yduUj/FWeqjyKL+iQPUT9GA+ihC2r16dqB3Btb5WUanrPELGHLg3Km2ZQrl
Y62i5aNf0fJxn0i++Pwf0XOh+LkGqDn/R924uvOFaH2xTNHri5eKXl9ME60v
+XGMEfnxRi5nm+xzF/Ds8YeVrwMT8M2pllvf1lZvh6UCWf9GRbJnIHtuQnJC
mRx4TXJGUv/Gz44F/Rswjfo31MlXN075GmZSvmZN+dok4l01KV9rS/naBeJd
dfILeFeMIt7V1m2Z9ovpSegQ+2hnlmAfhj9X2Ye1kePRV6MMkw/KMMd7ZplK
cdEov5PzqIm3AqUjTSa8Pp+IFzXnLDial4T67ztvDpqmRDuSc4zJASOSY09y
0pkckJGcYJJzjMmBxiTHhupE8axOBJZUJ+LvD+sXPH++lL9HbEvv8RbkEZ4K
KX8vuKduAY+BrRiPgQuJx+Dv/XJ+hr8PG7KqgN9ADb0CfgPPEL/xhN7vLbj8
Xkghb9Pyi0WEk1UsulSokj4+OQrbVlq+taHhaxxopD2n6xk3PGG0WFk5MQVj
jbVyq3tnY8+6bD51RLxKJcarIOdVztJ9LUn+ASYfWpH8Pi2Y/J1MPjwj+bo1
GW/Dn3cxyX/Cngv4c9mT/KF1GW/zlvE2uId4G5v3M0bLasdC9VeaWRdrROOy
Dh0kI4xe42Eaz80uGIfFNL4/xtlqVL8kuPeqkdbYqnJ8NndLk2Wt5WhL+UJv
li8gzxc6NzmwoMbGRBiyeGcP73rJaJkhc14hrPvXe8Oz9PfIoFNg3s/timiM
KHfRu7OPAmcSL3GR6g7Tyc4XEi8hp/pCc7JzR5qPlM0HYmk+1YivkDO+Ap4R
X9GH5tOHzQf603w0A9h8mrH5QBjNh/q1oDb1a/H9Lif/tYn5L1xL/qvKi+y2
pc/JoZUs5+dlRQLO2rTuvNHfOCeK6sXwWFQvrkHymzD5MOM38oPJL+gzv4DD
yC80qhjc2LVrKlrNTjj8/FI6utr7Ru8cLshv8i6hsWEqTG/9zi3RNx09yxw1
uTxMjrVpfCobBw8aNyS/fIP5ZehEfrkJybdk8sGF5Gt/M/g5sFQ6HqnQYa2W
MhW76H3xk4+RY3RAjTlpD+VobfbkxMmNCZhc8Y1LL105ms2+tmjtowRc0mG+
Z/QVOXY3Na0bq1dycW/V+lcvjOmtQJ+yBg0CJkThhtOmrXJmylFrxPz29h8U
WHOT1CHGPBCdeyy33X1LyI/WJt3pOlSJgyX7tifDaWz/ye3Q+Md/9JXxvImf
38LPveJ5Ez+/xVnUV3b+P9oP1rRXVHAbayXOmNillNc5C/Q0GD5n2g05xrZL
f/92hRJlxzq4+Z0zxaFZFx4EOspR9Ty6LlJ159HV/02fVUmdX/dvj9c7uPTz
Lz3M7dRo7/VzpjB607yAX3p4mjY95JfeHLZ7Lrt2zgJ01taf+Utv6p7r/6s+
Jc8ZO3RnCvZ8b3Bbq+MpDpAcsH6PpWDPNgGX22/9qMAmlqu9pxsFwpc2l6+l
CvafuyTv1uo+CpybWPpWy+FR4HXKMv/ELHlhP0+omn6e8mr6goxFfUH/9vMW
d7wK4dVBhldgSngVS3g1jeEVJBJe9SK8WszwCiQljFePNZccmyzglIYrbBwi
4Fath9s61xD0X9c1oe9xs0BMtA7N2izgVveAxEQfYb1irvVdkio5jQHK9XPb
Cuusk5J9ZbawvntE5/VxnsdLzXl9PQinLhNuXfiP4tWx5VNqtnyaim87mU6X
yFJxgmXwfs/RGehI8bA2xcPRFA/vyF13+s3S55h3ZQ5aHsjAxbLhX0PeCH4+
pmJkM/cXuExjefYzjwS8Gd/tZ+VjWdjKSCu4v28qmjm7NTy+5SkahaWM7pKo
RP1DOcObP5ZhUL0KK9JeRqGPzqLMkR4KvHSx4sr+b2Jwim0zq/TMVPyq6758
cr8svNm5yqja3xMxJCSk/+7mSei2ZczE2TuUuMLlTYUdCyPRKMQp8GCgDHvU
X7H9dFbJvQ/4XxsfLB1ZZ9o6OTZ8MUT+xSUG0+71OWa4OxOTH4X2LHMzEw+3
f3PT/10Q3s6sO6pjfgZ+ob4HVkd4IL1O9Xfe11RLTX/Unb/YH1Wmk0y5v3Mm
5tTzPJ/U7iE+6B9/KckyEzMcxgxesEGBEwx2RW8Y6odbH188F74ro/C8QTYf
f+n1f6m+/18ZfxG0b9yUO5m4/3iF3jf8g2BWty3n7n/JwN59w1Yt2CLEwW3v
XnHdHwNJ+5aOXr0rs9h9UJfDj8w8sVGBb1eHmn3p4geLDiZrvt6ZgVana3vk
dMnE4XcHbhjQ/CEsnWq6tbNlydVzS2r8POHPc4Y/MJ3wh/dBfaE+KJ6PbyP8
+crwBxYS/lwY73nyY4gM8xqsMhqkiIKOTytWWHVNgZMaLPOYJE3FDa9e91iw
+im0KJMzeeELJcZ17+rZ4eYLXGi0QqHjkgBfj25p3v9oFjq8O+uv9zMRl0wJ
ejKlWRK473la2kjAmYHBJ+4seReDsRPsBs/KTIXI0t8N+gq4tFcVf6D7/3H8
eUD+9IdLgT+FOuRPa6v6U+D+NIr8aRDzp1C+aH8KavwpqPGn8F+N/y37GHn4
CXG/yTn9W7/i2alP+qz6Fce6zxwadVeI++v03/PyV/w75vCYiF9x77K2/pXX
1ugiLW7/27/1+3T/9vio0M9b6118gNqeU7c1npWBmgZth0MrBe5+VnHCJUcf
jOj8dG7nvEwc8uXxwLX1M7H9+BUjHr70kyrIj90n/6XuXMH75Lcmkh+b+Jtz
Bad0DJVMbvsQh06ZvKyDgJeXL4V0mCHg5MS9Bz91t/LDVl6dFR8FPzZ6V98V
QwX/dVmuF2Ny6KaU+zGv/+P+y/DXP5vypOJ+xYa8T/HXf54KqTb1DZr4XzPQ
+qGUNqDvdWjcjfoXC869uxciTaZ+wsZVgqrUevgMk3MOrZimFYfVb04bP/tx
NjZ6+EY/8HGc1JX+LoWuv5/qMiFKEYnXpiZqPRifgMs8j0Z+jsjG8oajG/ba
9xzHjRvx8eTpMNw8465TU5tXWO3qwTcWJg9wSI/rAzw3JGKAefWPlVq8+j+7
XodI//Wpn7MS6X8q6fkN0zNokp6128nXt1z+VBpIfZ6hpGcXyzLlbG89x4q6
e3I/Vg2Di4u+fL647BXOGrTJuIpRFPaO8LNPqZcAzjW3nYx5mo3GpOemTM8Q
8h/VcxvCH5lHAf6AEeHPVMIfKcMfmEn4U7ranNZVFvlw/IEHhD8ldQ7hbMKf
4Qx/wInwZybhTxuGPzCS8Meb8IefO/J/HX9cyZ+2Y/4UJpM/1ZnF/Gld5k9h
NPnTs+RPi9vf+2+dv/Rvj1+9dc7b9Zwp1Ow0Mf9XXHFh0fHbv/TQ+3Kivvs5
C4jN1yjg1aa/O1DAp/G//K+ck1wzNc/n0Q4f0GjR9m1qfia+uR323qheJpZV
RJ26e/wBOCd8NK49OwMrb+wzu4uxAkMpL4qjPOnjb87T22GauKlcez+wkm1p
08hWgR1c/HGlkB/1jO194UPjh6DYOLLs+a6ZeGZl43bB/f97+VFD3pf/6+NN
hbQi4fmUEReP4MVnUMqq1bjslnE4tpnbqa8CnnMcL/CzZuHSMMJzt5uf8h2+
3IeVl2dvCT+aiHcq7Z7yvNkrnK5b9cnB4Eh4u/jt6DezEzCl/za7OoI/bdB2
vOPE+c/BLGt4VPeMMOw/aI9Bs1X/PTw/S3qoxvQA/UgPYfS8O9jzgh897/kx
iZP9TjyHipf25C+dGAb7qt25GrHiFR490KnuqFpRMMm+z+3BLRNgvjKhTmpc
8c8bLO741xRm/xWZ/UMG2b8ik9n/bWb/8G0Ds//intd3hOx/ELN/MCH7H0D2
n83sH+z/o/b/nfBNl+GbEIcwfDtG+PaE4RvMFOHbfwXP39i1NJMkOsACp1LJ
Y4cq8UnazYdjhPw3bmj5QdqGgfAjt9HBeR+F/EIe96PKbTlmfmuaLR0WBe67
4lss6aPAMEllPz8hvw4tofPu/u3nLe74Rsb/wHfinzn/c2PdQ61jM57DqEqv
XOyOZqDPqtBD7q9lavvqG656d9q2aySkv+0z5FioDLsbhc6fm6lASbhjiiIq
Bkaavvau/yEVLe3H6Z/vm4WfLy7paf4iEVw7X69U0TIJg2YELZ21Q4nRLp1L
f3Z4AXNtztR+eTcBM+/qhi0/loU7/bd0bueRCjM9s9LqHn6KWdLFFquSlHhn
+KZyh4JkMOOJm8bM/Ci0KROU1tnr/y7/Y8b4Z+hO/LOC+Od4xj+DF/HPSPwz
P0+P889eFD+XVJ9/ecY/w0/inwOIf1Yy/hlmEv+8mfhnHjf//4V/jmP8M7gS
/zyX+GdTxj/DMeKf5cQ/F7dv35Xxz/CD+Of5xD8PYfwzTCP+ecF/lH/eTfij
IP55LuGPL+HPWIY/4En4o65PRqKKP9CV8OdSwLaNPRIToVOm8/PMX303Xndb
GAo40ySzmol2TAxYa7XUufA+FY4f6Wu2U8ClT36OuVMeyGBAi501I3KioEq5
+d/HeSqw8s67O6x8UsGwg7T5651PYcj6PTlXEwT8adi+g47zCwhouz6zvl8C
TNvx3uDa0ZJ7X+C/Np5F/nQu86fwlPxpFPnTfOZPYSL50xTyp67Mn0IM+dPH
xTz/sKWa8w//a/opw+rvcIr6hTpT/X2BftOzG5wSoHYdo9zZ/nJsaH9l9f5a
cuwXnqQc4y+HbVonH513SsA+lnveH65VcnhYifULwU3qF9pI/UJlWb8Q6FG/
kAv1CyWyfiEYTv1CHahfKEnN+xr1RO9riPqFCt/X+K/WC5qwfiHYT/1CXqr9
QlD5eJH9QiTvT/1Chfep/5v3KUrq/MZ/e5z6haB50f1CMJb6hSqp9gv96bn+
7fdB1I17sH4hCKJ+oRTqF1rO+oXAkPqFcqlfKIf1C8EC6hfyVu0X+u37DqJ+
IRCfI/RvP29xx7UIr46L+oUWEl7VYngFHK+sCK82MbyC3iWMV5ODq7S4EJaJ
NY119ZYYxqLRui5rZVXlqOsS3EjZQYENf9yzXL0nFstNcz00xlaG9elzTfpe
i8bV/X6uYbuunZZ2VmBmla6+44Xx9yfGbbmwVoav6HNz+p6PP3QIdCozSYnP
7A5MSVowCEOeTXxihHJ0fBfwXi7kgSnv62nHLqyHX/tvOzzx/+UcsHVWxxt5
b/1jvGL4Dpn1ITk27wwb9v/P7z8GyT7XMzlQ+D5s4Xjt3/QZrlcj/zHNf87e
gvkDn/95mr+MzR++0fzV9fWJ5Vcg+ZNovaqw9QJjWi++HvpsfaCsaF3Ev5Nr
RHpXsHWAd6T/+mQH49h9oDXJ53ZQi92nUL6686lE6wt8fed+ZevH9fGd9MCf
k68b12e7WN3Z2x6lo87gvuMOt3+BWoOamdYbn4k1siLvf6yjwOZ751czs4nF
puY7miQ7ydCYPlej7/m4ut85tfVd3QjeytH6jWl89e6RaFozJ3uDMhOFKEtZ
ek4sfnm38OxQIwVePLwhuMFxGb4dtLPlSrkcd3+sOuyHgTd6Tvhc4XFDJW6n
z0r63ofGr1SY03j0aCV6NNc2alBtqCT6iK65xkM5Wsy2Nei7VokDKnz9OmBm
H0nDhLbxZ0+rt7cTOXGvnf7HbmN9bHbXEuzWcIwhVN31x7jzpxCr9nv/pDfg
eqtOemnB9ARcP+p+n3QD6Wcm0w90Jv28oec8wJ4buB4q0zq1Z/cvvK8RrYsu
uz80pvuqO+dnCq0H3b/wvrak54/s/nCV7ntyH8ML2n+F+27KNxV7K9x3XF/q
zvMhOwRuh3yc44Re0dejDl0/dInv1yH3Okn5OvP15ddvft3A6qwgZ+bgu3aD
/0cOX0++jmEjtbprvPeSGPjvLXtRyIvCJ/Tu13prBu6m91YUt05NqiG5JrlK
763sonEljV+jcYfbTroe6d4S/nfuNJ78tSXGGHtI+N/x69s+aZlVs5EMgyaV
tRjcwV1y2nwbOLlkIQx49uWA43lJy1ItWtjsTcNk5y4vBwe+RHP6vKqc9vfq
Qx0lkTS+PWVM0vDGvhI7OgflCskf82hl5sFqboXjbjS+zLDawHYVHSUm7P7g
QPf1sHug1+TiYUkrdh9IJPn9F6VXMTqxXHKG7TNIpf3F9N9MYsn0D/VE+ld3
Dg/tM4ih/cXHW7F1AUdaFz5O/gTukx/h499Fv5smtjdx/El4DxznFzKcBI6T
YrtdL8JJwj2oLsK9WwzHIEeEY1tp376nfexO+6gpszM4Y1412f3DJcljsre9
tE5dosu3X7r5msSV1ouv3/Kddh3qzfaS8PUlewAHl8eTpq45LYmg9dImPDIl
fChD+NCS5s/xwYDmr+78llmERxwfTFXxgT8X8Oc6w/ABKL6AMMKHWd9U9Aw/
1ODD79aL4iIg/4jcP2aTf+X+lvvZmvScHBf58+axdYLr5H+caL0Ib2GnyO8M
IPtm9j5KWpfsfCvDl8K4bzrhjBHZMR+/TPbM58P9gr5oPuQP4YKqHwQ70rcH
zUeP4hIeP7Si+EGkn8L4Qd05DC9V9VYYn1BcCo1FcSnFmZAlijMpbgRx3Mjx
neuB76Mforyptmo89qfrud2kieI68fXcTvj8m5A+xPPnz83nz+MPX7KHS6R/
W/IfXL41re9nup6v12W6vjH5jzHPtC78kLlLwmhfE87D5PfVK+cEXynEeYof
oDb5c75P1f0+Dt+H3G9zf32VcDnQrMeNNW8nS6MIn9X9vgzHXz7O4xw+n1qE
H2VF8xH/LsxGmo84bqH4GeqI8h11v3/B8eKxKB9Rl3dzf8DHeX6h7noer4Tb
qeYL6vL3CTR/ytcK95e633eoOWKv5uhDmXjY39xvT2osju3poXe4qZBHeFq3
8jVW4FBXuzH3b8RiR/MnNRUbhP0YdkqrhU4yJlz8Psb7jgyPBJisP2Mqx+ob
fw7q5pqA7hpPdBx95fiw6ozBy2oL9kzy7Zh8GE/yJ6rKh04kf5qqfDhK8p88
CxrqZhGILy7fbfj8ixDnfLXKaX9Djiubz+3Xv9tpXOc+duDVEUK+sNF5w4gH
wn3tS/+86RmF8FazwxBnBXrYvDDWSZHhuKMWFQ8fC8T4ec0HaoOA+510arSd
KMfhH7ByQPnT2HLb3XaWm5T4ILnXKq9f550W832Ws3POOX3xikKnFdMj5lxR
4MlpKZ9qJ8jwzNTA8ysFOVUyoE9HcyWaZXo6nx4nxMc3LsUM+OCAT3uf8pi4
WYnPaw2OWfIr3yw7Ln5493S8cuxcmYZbE1Aj9UpP5dxMnNLbcdT4ssk4s+Ho
9G1HZFghYvDCb9PkGB1cvl/Q90x0zqiXc7pvHE5aMNbTap+Az1vajZ8ULke3
NsvSUzSj8HnNS/paOZnYoW+n710+yjDizbknaZCEDY+M7/J6oBxlI89mpExL
wQPZNfsvu5SIPvf6ttF6o8CFr3SsrKfE49tKryZ8j83AC2sMP17LFeIHje7H
n/s/wTidJrNuvZBh7/kZi1z7K3Dy9rN+m6XxqLHg1YhLZZOw00WP+9reWTgs
wmL74+RINDgdOd8tIA1tZUvv3LTOwqax91ofWX0bq93L33lLeJ7WWuPMshYq
8SfpwY3pAbgeJpIerJkeoBzpoVdvSbWd5V/glpjwr7vHZIBvrwVSo3wBJ0kP
rkwP8IL00I70EM30AI1ID6mqegBf0sNs0sM7pgdwJD34qOoBuB5qqdohXCM7
nKBqh8DtcIyqHQK3Q5FdgRq7AjV2Bdyu7nSbZP/drBNaGp87+HmlEs930j+4
97wcqzbwq6B9zlTK+Q+OS+0sFn8KjayBe16t6zFJiCcdXPUl4YKfGjF0Y05o
ZGkMW63jkieML3h+N6q6MP5T+C/IoqxUXR5U3D5tcb7/V8d5nuUyZ0KPhGBf
/PquVY1qhgp81uxnSoQiAwPim4V1qO4vdaD8O538Tn/b3poVksJxVNakoGpS
BTYZPNp5SSMBB3IUB4ZXv4tLsubbd7BQ4kJnr+/Tt8jxAlh9+FV/Fedx/HfY
J/3F33NvcOF1J9OQcBy6JupR18cKlLteXetYTY6XKz3opffUF5P2Tr+iuViB
1+Z0y9p5KgPX+zTS1NG9KT1OeT/3g/1jjfI+3nLDPT8XfgvIzcBJE54s6yDE
m8Y1L/UsE+KAH83Hrds9UIFtGhrtqpCdgX6nzRX2L85IeV7pSvFetUHtz+9P
UGBMN4ewunouaNBPOeZl3wy00j0RtN02Hc+Xf36w8rhYHHJ51c3BOoK+haea
4575p99bLyeMS/f/+ffTa2pNmdThfhy6N4qPGRsUi22VH+779XyFK3asqmos
jZEaUn55geINgwvvmlYyD8R7PV5lru6WjPO7+bfYHpeNXUd7NFn5/o7UiPLL
FMojTqyq3+Gz3hdpZcpX0ime4c9VtXvBc4H4uVzYc8Egeq5K9Fzi30PnzyX+
3fP+Yd8TPR6n433TOU0Ozz0APYebO3TPzMIeP0ZrLBl7T0p5MSTRPHuTvY1l
9gb6ZG/uZG/Lmb3BPLI3J7I3cd6qS/YzjNkPyMh+6tf2amH74w7mHoj88WyY
Es5rGHzWWiEX8HisRuVAlPI8gMf/QPZzmNkPjCT70Sf7yWP2A83JfnzIfowp
b3Ai+0lTxQ3guFFumApuwEIRbqjLi9er4Vt+N87j6vb35w57Y9YXKi7v03Po
HCUe23ljcbKXEF8ZLHgnzAduuTAcszrP5vOujfV7Yf6wtv76Atxbv4TNn8tX
1xcqxh/RfArxalyM5f0zrsEQFl/10dybGZg74nvHORGZqH99r8H0rDuwJqG8
vY+AM/uerTh+U1j3ahsPPNF8HA4vh+/sUf6OAiUrzz8z0lff5xl/zmbZxrg7
8FKhETFquBIby8p0ni6se8PXWmYLrwWD9a13a6fUz0Tj/GDrngszcdrsqNKn
7ziAljJpTZVBCoxwbFja9mUG2p5dBqE33CBy8oXQYXkZ+LDfHPvr7RX4c2DB
PgJpD4YP7WkftWf7CF4SPgynfRS1bsud+KB0ON1hefnNDw7i0mpfVw18mVUo
5weTA2I5H2k/DhPJ+cnkwBKSs6L5ssAeuoHwKb6sfopVMjxMughnn2SjAelz
PdMn7CZ9Vid9vmH6hK6kz2ekt9dMb9CI9Nal90fbZr7h0OGJcmKrEAW4hndL
nFRdiLdJb9pMbxBKeltDeotieoMHpLd1jVXsDQaSvV1oy+xtDbM3ENub2J7V
jTfXPNFas3Ug9Im62wdzFehyyuf7ISFO3jt/U4ONY6Kgv+vzeY2tFLhtYJOZ
L4V4w7YRNLvs6ABrK/gPmyDEvY/apQXcFex5y6P4iiPXBsKXEU+vRwpx8jbH
CZ5RwvWpJ3tfXnU5CrS6muZOcVGgMsyi4hshnilu353uap92eXscoL20z/OF
Qtz7esKOrraC/wrtN7BRS0FO5cE99HKFOLns9/hPZuPlGFGzWoancxRMP7Ia
V7sp8L75hIbfhPgnhcWH8J3iZE2KDxuz+BA2UpxcluJDB+nKY8dKv4D37t3u
Th+XgaXKnvULzZNh3c0ex9b2iodVaeejLFIyUC+w3cduOTKc0++7M55+AtGT
jKVWGTJ0q/lwwJq+CgyuP/DeIYUMbKZKFbETkjD3StDyfoPlWGNBnLaGWQq4
6c/w83mUiPkjrjbbJcSNmyK7j/cLlcPmoJa+t8pF4cmPzy9eFeJPu4/v7O+6
RkKoTnmLXSFp2KH/gmVXZmbh4aGVh2+7Eg8PTXq93qSbhL0bPFrXUoifU+l5
v1E8zJ/XgJ53M8XDpeh57el5c9jzwvcy7Hnbbe3T9ee3TNBcYt9Us38cBB/P
u2K37w89rGN6AF3Sw1zSQwzTA1wR6WEd0wPkiPTgzvQAeSI9bGN6gBOkB/9P
y23P9rkNhxVaP5rOksOSTaXb585X4iayzzXMPkGNfcJ2kX2WZ/YJCrLP6mRv
HZi9QTbZ22NVe4MyZG/hqvYG3N4qs3wWrlK+zPPZUz8Gb3PRTIb8urs2tgiU
YWKjRXmGQt6aZGSwaKGxAsaOqRnh5hOLOa/X6GpslKFNWpWww4fksHXmzrt3
yiXiuoEX9Rs0kGNFku9M+fJkkm+vKh+4/ESSP4bJh1yS30i1Toe8Dqjud98m
UH0kmOqTnP9UF5/zOo4J1ZHKE9+i7vdcZhPvQ7xLYR2N85i5xCNyPpPfV5yP
qJvP4LBdR4Ma2UiJ58c0iuf59ep+14DXzTifP3/3o3M41U3ShuLPMxR/Xqy1
58ToZdclnP/mvDeXI46jbIhP5vXexyJ9iuMHEe9dyKepO8d+tiq/Xcin+ROv
l0/6dCR9NiQ+iNeHDcke1J0HDmEdhzZ1S0OfPRETt/dKw4GTv1UcNVaO5YNO
rRss5IsfVpf5eDUtATc+O7leUVeOZnS9L7seBtD1Fej6T+x6WE/XV1Pli4Dz
RXcOmixpOS0KvwfoJJUaoMAJIw6mm09Uf95IP8r3N7J8H29Rvh9JfIg740Ng
MvEh78ZVmPMpIB5zdRNdvmomwUCvl1eDrmdh54nr6vulROI9l5o2RwLSYJ+9
e6KvdRZWJ16iLuMloDnxErdont/YPGESzTOaeKoExlNBGPFUK4in2sh4Ksgn
nqqk3vtOrTpWN9esL8KTE21/xbdH15Ta/Cu+VbdfOl9dOSrJLxhL12ng7OCb
gaeetFnUIzJT7XvEyl3To4bcCsZzei3zFHUzcXnM6IrvhLixKeUXOSy/QEdR
fiGuY/K8TIf4Zjnto36UN2V1KsibkOdN1yyG+n9p+AT1Tvjv6uYej/ct2jaT
1XlVmD/6sPwRWlP+eK585roBm2KlLYm3Pk/716/++sPKYU/w1sCOtusXxIP2
wbjD9xu9EvJullc6srwSbCiv7Ej6ydYr0A94kX6ciE94y/gEkBOfkDZmztxp
73ylp4nP5nxCSb0XmU76P8v0Dzak/3Oq/ABwfmCtKj8AnB/QrsbsxIzZCRwm
O1Go8kJwlnihsqq80J/qmP/0/cHD6xbUeGnWCYZOg3O/+Ki+tx5u/HVfdXbr
1+VGdb0rvvApr7rJASMF7qo2t9f1zAy178Gds0v2+XLHF8LraXTotkSBjv2s
nU/ZZ2A3iufbsnge3Smeb/OsR3Od03Ew/btyQp1XsfghJG6mUrCrxZRfhLP8
AqMpvwjwyOrZUvsJPPjR6UwpjMcK0zppjBDsk8uZx+TAe5Lj2XeKjbbkCWh/
Oqx53DYeNI7UeNVSsEOk5yqVX/BcsIaeaxLliQqWJ0IS5YnFfe9JpAfgemig
mg8CzwfdaV0Gs3UBC1qXIZRHV2B5NJygPLq46z4zevuIVs8dYGL0rUqxI5S4
p7KRd98H6t/rMaF49dvigngVH1K8+oDixiMsbsTFFDfG7w8+7HolEpyjtgUt
CUmD6bmlHVyEuNrs+KCdXz3iwTBnzfinVZPAY7BLRbmA/1NoPuPYfGA/zacx
5VNmLJ8Cd8qndlA+1ZflU7Cb8qmS6qM2Zf4U7pH/tSJ/OuZb2eVltyXAx/6P
K4Mwv6HTZgXo1xTwlq4PIP/Lrx+tej3w61eqxp+wluJP/+51bO7LYnFUH1xq
eTATG1U1fqsU4s/pq9NW7L4hwx5ecxM9DJJR68UVe7vOcnx3peKgBMNEfP5y
dd+J2+SoP7Tj/YqN5Nii3c5b2oL/Hm1Te/0OwU+e2PZjSnNBP+W7VKnx9osC
Z2fpTn3SLxA3bn/cu4Kgz9ejZ7/yEezA6HtE60o9TmOtBU8s+gnP15PqNzWJ
R+f8Oa/fcB6d8+fGVL8ZSjz6feLP1Z2vyH+39zr5W+3fnK94keo6p4iPP0E8
PK/r2BMfD8TD87rObuLj44mHn713WPdffrp6fEXlewGPZzi2Wf5rH6W2mHvi
Fw5e6fH+e46Ax9fzq+/6te94HCxz2TJca5+plMfDdsTLDwLGt50ini2cePml
loxv4/w85+U536auj/Hvnq+orq9S3bi6PsmxAd6nfulhzAUb8w8CDh25Ybyt
wB+9P1vA340eEbn7rYBDdv6WBfhzm/i7jLqMXxlAvArn73SMGL+yjniV4p6j
qG6e6vow9QenbkwW7HnkO+9hFokOcLRPuUVdBHsudWv8mqe5Cpzu+GiCeZtA
sHlTc/8swf7vGV672tJKgauNe16RC7hy8pvj5DDBntcRL7OB8mCe/xbyMpQH
c36G8zLplAfz/HcF4WkY4dOOv3m+IuXPWJny6VeUR3O+5iHl0zyP5nxNKOXT
DyiPDiOcGcRwBppwnOnbbJSjSTqGp00x8byZCm9vlWkSPkrIWwl/2jH8gXKE
PxNsaxs6RssxpEWvyDEzE2By+XQ/gxpytLwcoBdlm4BH5gz8FCBJx6sdmtUP
mJuJWZcrbPy+KANjR1UevePxc3zdTmvD2s8y3JsWOWZGfAZamdSYlTwqHm0h
f0nKFyGPvz6tlEfqrz4p+9gtrk/war20uokWCjRbfaWGh10iHu8+TtNP8hxf
VrRpp+Wbhd/MFHb74tKw4pLX7Wcej0TP2x/7LZmchU8fdk8eNUOO3RJC7nnO
vo0mi7/GJy1Q4v4bA55mRQjr+eHHuZ1dYtD8QPQ8p5GZuDV5mP1mIZ+b1+DB
hX3jg1Arq+74ulEZ6Er57V79ytf6Wd6XxlCcyetV5lRPaEx1hKVUr3KlesIC
qiPwehWvX/G6VUmdg5e6z2zDSiFPkPd6vVlLGoztvTy0+izKxLyD4WYXFynw
SPbPTr7PfbG1v8ubJCFe5XWsXkbvjwyYelMaR/HqfqpjDaa6xDiqR3yiOpYJ
1SWMqR7B61i8rsXrWWuJT29IfDDn1bOJT69CfDDn1Yt77lyVzV99EhcrMM32
afu7gb6wIWp8XrYQX1XbnxH6sl4mStfW1bjlGQw7p2423SvEV+WIZ19K/HEk
8cbhxLPvI/74EfHGikvaGQFbZaifM+9po5bJ0C5RX3+nYE+fyJ59mT3DS7Ln
w2TPpsyeYSPZczrZ8yVmz3CF7HlT/rnstdZCvBa/t6Zj59swo/mRfbpCHOX/
eXiZ00lpaJAakBBqHQmLfwyZv3KikC+bxQb7nEzESwMrLZjU9jm0m//swDWf
LOR53Y0Bdnc0PudIeX4nN11z5Ia2KzauKvfeHKtA0wt3G94cmIE3yjka57rF
oZ6FdZR+bhpW91k4ONVIieE1fuT9uP0Uo1a5bV0THIPQ5dmo/t1fYfcunvHN
h4Ri6mrP2dLkBDwg9f88/ls2ZtP1/ux6kND1ti00N4UvT8Zlr7svM+kRBEkR
pQ0kt7OR1wVhQ333keO/SHl98H9+p8/s/Ygif6cvtda5P36n73KPDlf7H30K
PZvN11nzNgbvDPJz0pa8wnl9Ig6kNQmFZIs61Ua8S8AsXF76VH429u5WoAeo
zPQAlqQHDa0CPYAG0wNwPdSe/nP2S/+DkDhqyyC9++lgMH3BUP2XWWgS2mrm
scmhUHdp1tqY8ARIsjOtePZnNkYwO4EJzE6wPdnJ/smf9cctzIBzZco++Rj+
HM8H5JyMFOykrp5CUt4iCSa9HLTf9Z1M2IdpMV0HydE+Ldlk8eVEmDhwwc33
U1PQodfbQxXeKArrlL0IZxoSzthQnfIq4QyvV/L+w/cPl3zRHHOvsP/Q50Pk
+Y6PFeAc+6mfVUg45k2TXrhUTY5OqwJcY4Yp4VuFvbpuP+6gyf3SdXVW/NGv
+Miq/XrXByjlPBvhAwwoGh+gZdH4ALxu6UL4cDPwx77urzNh7waPLRcMgyA6
pqrhh/AMdPqyQzo4Tg6HmmpGezeKgbRKTnM0BXzeQPWk+oQnvK7E60kcT7oQ
nkyOMl44bLgS+jyKHXMz7g6sbhFcx1p4Lr0Jg/Kahyhgr+zCdnMhH/XL9HKe
JuShVIeDhYQPvB4XQfWk3YQPvB5nx/wdrGP+Dri/W3a31dkji+PAzOZ1nQHv
MmFOWqkBrodk+LjBzy13SkXBvlELGlQPl0ODvjNdmuZk4k3ml2Ecxf/1yC+P
Y34ZnjK/jO/IL/cNHHO/mqcM7p9Z1qxFq2RsXDmp/g/BL3czbnnvWalE2Hx0
5pzGR4T4ZijmptQvjOdBTxTPP6c+mMlFx/MwUhTPUxwOp4uOw8Gh6Dgc9oni
cIqfQU38DGriZxDHz+r6RdWNq+sXpTgWZEXHsaAtimPFcrTVyOdxKcWTsLno
eBJ2iuLJcryOQvEkr/fxOkq1ouNACKE4sKxqHAgRojjwMdnbYFEc2L6W2dn0
G7HwdNUVl6vGAk5aJI5/uUGGEyk+fEJ2+J7s0Grkau8bPrHY+caEC/OMFfhy
9lRtzY0yHEPxYTSLD3EqxYfD6fqO7HrIpuvzKJ+NY/ksGFA+G07+dyzhakfC
VZ0KknawLA6/Red8X/g2EzeHTqjwTthfNs0euT6cloTbPZqcqZkhQ6cuiyQH
B8vRdsOSHXsfJeKyVd5rWpml4BaJltYOAVcXbPfVflguCpWrjVp6h8qxTdv8
/teE/ejNcBLdCSe/EU6eZziJpbQZTnYknOR9vxwned+vH8M33En4FqOKb7iH
8E1G+DaB4RX2JbxaT3ily/AKOV5JCa/2U7y9kvDnGuFPfdJPHtMPcP1sIv3Y
Mv3ARdLPLtLPDKYf2Er6WUH6SWf6gXakn//5PZcCf837jv7nd1sK/DXv22lB
dZ2m8R/7V3gUInUkfvhOt97dWr47iN43p998E5iOE11TP78R/GzpnitOpE9M
xr0T+4TO2xeEwwduWlnqbjb2pH6jTp0XbVy+9bY0mvp5XnRlcU4VkX/PoziH
+3dd8u8nJey+V9l9YSrdV1Kl66cGdqH48nDXXttuJ4BDr8S5CzVf4cDOLH4w
oDiqM8mXMvlQh+KoKiS//1QWP8hZ/ID1KX4wIn58ztSknNYnwgv18K3656HL
rJKhgf6UQW6+QWg/puWoj/eyEahvyblMvzPnA+5Ko+h571P804zFP3Cb4p+L
GUPrZE5Lhjo319QpPScIqgboz+gn6K0v+Sl7ystcyE6mqPopXEh+6i75qUPM
TyH3U8ZRKR39YzJgi/0Aj0/T4/HCudMLvubKcEFjq7EmL2TQaYNd2XG3n6B3
n10VnvRXoKbry8TjWxPhGrQd0rXPc9xx8WPFRUK+9mhilbig2DRYER9tbXEq
ErNiKnh4CvnaHePLMc1nyGHSsJ7D9OfdxqTUR63z/8jXQOMjy9eA8rVtLF+D
FZSvlaN8jd7vA52uDjf2Tbgv5e/3ldR5L5RnQQrlWR0oz8pneRbsLTrPgo6i
PKu455xUZfkOiPOd6izfgTuifCeL4lIDyl/aEH46UFy6lcWlcJri0tYUl45j
cSkcobjUmeLS4SwuhVMUl3Yke1jC7AHOkj0sI3toxuwBvMgeWjUuk29lLYep
TQwmVe12G3qk1XppIuQ7Q6puqROTmAYX4mobus+LhPHP5lT2E/KdVjr6Ky8c
TITxinvJyabPoekDg761BPsxJj/1nPkp7E9+6kqUjen1IDmkbh4An3YKuBhU
ufX0mnI0YrwojCde9CTxolqMF4UFRfOi0Ip40drEi/J64b6i+UzwKZrP/NP5
D9aMh4TyxEPOVOUhwbFoHhI8RDxkSZ23QLwfKB2L5P0gc7gq71fc8w0aMV4O
xhAvd4x4OU3Gy4G1iJe7y3g5WE+8nD3xcsSnQUTRfNpfPn9gMsXV0SK+awDF
1TdZXA08rjajuNqWxdUQQHG1O9nbc2ZvYEP29v8AeNpqOw==
     "]], {}},
  Axes->True,
  AxesLabel->{
    FormBox["x", TraditionalForm], 
    FormBox["y", TraditionalForm], 
    FormBox["z", TraditionalForm]},
  BoxRatios->{1, 1, 1},
  DisplayFunction->Identity,
  FaceGridsStyle->Automatic,
  ImageSize->{367.4947141339364, 368.73240940910495`},
  ImageSizeRaw->Automatic,
  Method->{"RelieveDPZFighting" -> True, "DefaultBoundaryStyle" -> Directive[
      GrayLevel[0.3]], 
    "DefaultGraphicsInteraction" -> {
     "Version" -> 1.2, "TrackMousePosition" -> {True, False}, 
      "Effects" -> {
       "Highlight" -> {"ratio" -> 2}, "HighlightPoint" -> {"ratio" -> 2}, 
        "Droplines" -> {
         "freeformCursorMode" -> True, 
          "placement" -> {"x" -> "All", "y" -> "None"}}}}},
  PlotRange->{{-2, 2}, {-2, 2}, {0.001, 1}},
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02], 
    Scaled[0.02]},
  Ticks->{Automatic, Automatic, Automatic},
  ViewPoint->{-1.8454547804133605`, -2.347678777825834, 1.5914462006601646`},
  ViewVertical->{-0.8820208743926976, 0.14529159801135139`, 
   0.4482516354491628}]], "Output",
 CellChangeTimes->{{3.820509841271452*^9, 3.820509900133494*^9}, 
   3.820510720354329*^9},
 CellLabel->
  "Out[1521]=",ExpressionUUID->"9f058645-cd48-4029-acb3-ae1d47c32b1f"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"pts", "=", 
  RowBox[{"RandomReal", "[", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{
      RowBox[{"-", "1"}], ",", "1"}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{"50", ",", "3"}], "}"}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.820503670738944*^9, 3.820503676850926*^9}},
 CellLabel->
  "In[291]:=",ExpressionUUID->"cd4faee0-9c85-4423-932a-db09f2746a8e"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.06803332297846332`"}], ",", "0.35368628397922874`", ",", 
     
     RowBox[{"-", "0.11718760602217371`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.858778521893357`"}], ",", "0.8530324181511433`", ",", 
     RowBox[{"-", "0.5524924776364903`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.340568694933149`"}], ",", 
     RowBox[{"-", "0.7911140161486312`"}], ",", "0.6285986806186883`"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.0683106946049139`", ",", 
     RowBox[{"-", "0.905360822216287`"}], ",", "0.6650910517756179`"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{"0.7403594949385579`", ",", 
     RowBox[{"-", "0.01488745607323505`"}], ",", 
     RowBox[{"-", "0.8848906251404687`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.47852114231568565`", ",", 
     RowBox[{"-", "0.9872203174548311`"}], ",", 
     RowBox[{"-", "0.4720467784589837`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.1556440180820653`", ",", 
     RowBox[{"-", "0.12332102529029187`"}], ",", "0.9499883881650626`"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.3902922364040413`"}], ",", 
     RowBox[{"-", "0.6094209536033413`"}], ",", "0.194359435319432`"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{"0.5169554109835985`", ",", 
     RowBox[{"-", "0.9571965319255207`"}], ",", "0.21123450059813198`"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.7857241372314232`"}], ",", 
     RowBox[{"-", "0.4978960342917369`"}], ",", 
     RowBox[{"-", "0.839323372820787`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.9341946083757802`", ",", 
     RowBox[{"-", "0.27586474373785164`"}], ",", "0.1340694091828536`"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.6794373704810277`", ",", 
     RowBox[{"-", "0.07079612835498539`"}], ",", "0.24085292911817247`"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.22814057137014343`"}], ",", 
     RowBox[{"-", "0.4846007696840502`"}], ",", "0.9338921151388848`"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.3631048035621811`"}], ",", 
     RowBox[{"-", "0.7122632559396935`"}], ",", 
     RowBox[{"-", "0.91340314021893`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.898415427246924`"}], ",", "0.2719936071117002`", ",", 
     RowBox[{"-", "0.299395592605749`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.08595918919369572`"}], ",", 
     RowBox[{"-", "0.6919359765249169`"}], ",", "0.9020216423959191`"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.2376268206332175`", ",", 
     RowBox[{"-", "0.04485591184202553`"}], ",", 
     RowBox[{"-", "0.04686119976879377`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.3727487959676634`"}], ",", 
     RowBox[{"-", "0.1907688702393311`"}], ",", "0.39952655979841367`"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.9443408306947494`", ",", "0.63371538734319`", ",", 
     RowBox[{"-", "0.19824068794527205`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.4644406880671905`"}], ",", 
     RowBox[{"-", "0.9506818393948309`"}], ",", 
     RowBox[{"-", "0.0818839706861536`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.2775569527813335`", ",", 
     RowBox[{"-", "0.6690508035496254`"}], ",", 
     RowBox[{"-", "0.1324420786673648`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.8622639864724353`", ",", 
     RowBox[{"-", "0.41783312854170207`"}], ",", 
     RowBox[{"-", "0.9754822179477536`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
    "0.46214066123850595`", ",", "0.9061644213948639`", ",", 
     "0.8694454046096971`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.9468208249837602`"}], ",", 
     RowBox[{"-", "0.5206446734725994`"}], ",", "0.5081948975136084`"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.12751379174024136`"}], ",", "0.8638807537084183`", ",", 
     RowBox[{"-", "0.8551121959838399`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
    "0.7345343389748638`", ",", "0.760039791234695`", ",", 
     "0.3109876594369383`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.12412983149001056`"}], ",", "0.4232791524874804`", ",", 
     RowBox[{"-", "0.10223662431831348`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.06821620593728017`"}], ",", 
     RowBox[{"-", "0.6317619180798202`"}], ",", "0.8710896630720693`"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.6116390354602959`", ",", 
     RowBox[{"-", "0.692789925047613`"}], ",", 
     RowBox[{"-", "0.7718752650797804`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
    "0.9779242962408197`", ",", "0.9975636827527481`", ",", 
     "0.048317916664497584`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.446999270121875`", ",", "0.290431200652042`", ",", 
     RowBox[{"-", "0.33219787335343964`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.16593731011162793`"}], ",", "0.7967370654328145`", ",", 
     "0.19666605686472582`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.33472465817046526`"}], ",", 
     RowBox[{"-", "0.8466560264299927`"}], ",", 
     RowBox[{"-", "0.717071424399796`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.6367735425677776`"}], ",", 
     RowBox[{"-", "0.5712628747463455`"}], ",", "0.08746262337519495`"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.37886777598217236`"}], ",", 
     RowBox[{"-", "0.6798327681183078`"}], ",", 
     RowBox[{"-", "0.6540967821393013`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.6871846822146068`", ",", "0.316963788646643`", ",", 
     RowBox[{"-", "0.32232814678990795`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.4228972775701103`"}], ",", 
     RowBox[{"-", "0.8086305499694113`"}], ",", 
     RowBox[{"-", "0.9748477131473505`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.3056138512827862`"}], ",", "0.35206003424971755`", ",", 
     "0.39371530089953355`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.5909780618923546`"}], ",", 
     RowBox[{"-", "0.7333920470012862`"}], ",", "0.5389222008221135`"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.7167193345209877`", ",", 
     RowBox[{"-", "0.012690000805734236`"}], ",", 
     RowBox[{"-", "0.5983485831818887`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.8724245860442732`"}], ",", 
     RowBox[{"-", "0.9708568962009396`"}], ",", "0.1394578903139836`"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.9045903023512962`"}], ",", 
     RowBox[{"-", "0.11912167625883185`"}], ",", "0.7340282382697261`"}], 
    "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "0.006134959002574103`"}], ",", 
     RowBox[{"-", "0.9393521591131`"}], ",", 
     RowBox[{"-", "0.24727244009572757`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
    "0.3209966400835125`", ",", "0.5671369293098034`", ",", 
     "0.4214587617557246`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.8709147404620055`", ",", 
     RowBox[{"-", "0.666124126110867`"}], ",", "0.9314226254124085`"}], "}"}],
    ",", 
   RowBox[{"{", 
    RowBox[{"0.34989130049350825`", ",", "0.861601271391244`", ",", 
     RowBox[{"-", "0.6712497416346874`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.4518203800963776`", ",", 
     RowBox[{"-", "0.8856462537944498`"}], ",", 
     RowBox[{"-", "0.657945782967404`"}]}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
    "0.036812198491253945`", ",", "0.9203030760400734`", ",", 
     "0.3134767829634417`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
    "0.6206158106344053`", ",", "0.7748075144756794`", ",", 
     "0.9525935041152858`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.03930905907075699`", ",", 
     RowBox[{"-", "0.3824551046008069`"}], ",", 
     RowBox[{"-", "0.6921998379147873`"}]}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{3.820503677205269*^9},
 CellLabel->
  "Out[291]=",ExpressionUUID->"791f0a7e-e758-4775-84cf-da40126ee2a3"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"pts", "=", 
   RowBox[{"RandomReal", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", "1"}], ",", "1"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"50", ",", "3"}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"ConvexHullMesh", "[", "pts", "]"}]}], "Input",
 CellChangeTimes->{{3.820503716335411*^9, 3.820503719966785*^9}},
 CellLabel->
  "In[321]:=",ExpressionUUID->"f0baaa9c-db48-4070-9d2d-2c58d817d9f7"],

Cell[BoxData[
 Graphics3DBox[
  TagBox[
   DynamicModuleBox[{Typeset`mesh = HoldComplete[
     BoundaryMeshRegion[CompressedData["
1:eJwBCQL2/SFib1JlAgAAABUAAAADAAAAQDDPc8RZoD8AFgBAYkfvP/DZW/Sz
eOa/pD3/Wyd677+8tWFrZyvivwi8tvrCGNc/8BH5WzK8179I5vANgdPmP+gq
jM7OJ+6/2OiwGuOU47/IFETS8k7nP2SVm/zgkO4/SI8OFvO61r/Ac/Mj+j3i
vxyGGBn1Hei/aFkMw7Tx7j8YSfZPoxPZv+ic63jaxuc/kHQ4jwG77z9sPlSC
OvHtv/h24StfhOY/SPinqvNl7j/Ehw4Ob+bnv1CVJUyL3uo/hAT3oKxp6z/0
s2bgsYvsPyhfbAUsSeg/eFSslJOy7D/Y7YVz/avUPxzJsbwjHue/gJtpGu9Q
pj8IS1ly8ZLmP4g+yVhqR+4/ELWZRfv4wb8ArJEVuHDBvxiYSEkjhO8/FGoi
N7FS7T/8Q9q/C0rvP8CtNSljz7A/ONjnAOMw4z/g/smB1dbsP/ht/4Cay+y/
UHoyS6dvzb9cbEOHVrHtvyDryzyjGLe/9B3X0BO+57/gswOYa+XMv8SCC2tP
Oe6/MLiS2tHN6z9A05yYV6+wv+ghJz6+2de/MOQ68Clq77+AYFD1d7mpP1zP
uFZZke0/2D0XoUS+3z90jLY9eKHnv+zOsuWjK+0/AFAetzARuD8olqvstQnS
v+xte7WBtuy/lB6qozn27L8MeCmJ86rrP7hq+zYFH+U/JwwXsg==
      "], {
       Polygon[{{16, 21, 3}, {16, 20, 5}, {8, 9, 11}, {20, 7, 5}, {21, 2, 
        18}, {9, 8, 6}, {7, 15, 5}, {9, 21, 4}, {21, 16, 2}, {15, 16, 5}, {2, 
        16, 15}, {21, 9, 13}, {10, 20, 14}, {11, 4, 12}, {9, 6, 13}, {20, 16, 
        14}, {16, 3, 14}, {3, 1, 14}, {11, 9, 4}, {6, 7, 13}, {20, 10, 17}, {
        4, 18, 12}, {3, 21, 1}, {8, 11, 19}, {11, 12, 19}, {4, 21, 18}, {7, 
        10, 13}, {20, 17, 7}, {17, 10, 7}, {1, 13, 14}, {6, 8, 7}, {1, 21, 
        13}, {12, 18, 19}, {18, 2, 19}, {2, 15, 19}, {15, 7, 19}, {7, 8, 
        19}, {13, 10, 14}}]}, 
      Method -> {
       "EliminateUnusedCoordinates" -> True, "DeleteDuplicateCoordinates" -> 
        Automatic, "DeleteDuplicateCells" -> Automatic, "VertexAlias" -> 
        Identity, "CheckOrientation" -> Automatic, "CoplanarityTolerance" -> 
        Automatic, "CheckIntersections" -> Automatic, 
        "BoundaryNesting" -> {{0, 0}}, "SeparateBoundaries" -> False, 
        "TJunction" -> Automatic, "PropagateMarkers" -> True, "ZeroTest" -> 
        Automatic, "Hash" -> 2265005469742749917}]]}, 
    TagBox[GraphicsComplex3DBox[CompressedData["
1:eJwBCQL2/SFib1JlAgAAABUAAAADAAAAQDDPc8RZoD8AFgBAYkfvP/DZW/Sz
eOa/pD3/Wyd677+8tWFrZyvivwi8tvrCGNc/8BH5WzK8179I5vANgdPmP+gq
jM7OJ+6/2OiwGuOU47/IFETS8k7nP2SVm/zgkO4/SI8OFvO61r/Ac/Mj+j3i
vxyGGBn1Hei/aFkMw7Tx7j8YSfZPoxPZv+ic63jaxuc/kHQ4jwG77z9sPlSC
OvHtv/h24StfhOY/SPinqvNl7j/Ehw4Ob+bnv1CVJUyL3uo/hAT3oKxp6z/0
s2bgsYvsPyhfbAUsSeg/eFSslJOy7D/Y7YVz/avUPxzJsbwjHue/gJtpGu9Q
pj8IS1ly8ZLmP4g+yVhqR+4/ELWZRfv4wb8ArJEVuHDBvxiYSEkjhO8/FGoi
N7FS7T/8Q9q/C0rvP8CtNSljz7A/ONjnAOMw4z/g/smB1dbsP/ht/4Cay+y/
UHoyS6dvzb9cbEOHVrHtvyDryzyjGLe/9B3X0BO+57/gswOYa+XMv8SCC2tP
Oe6/MLiS2tHN6z9A05yYV6+wv+ghJz6+2de/MOQ68Clq77+AYFD1d7mpP1zP
uFZZke0/2D0XoUS+3z90jLY9eKHnv+zOsuWjK+0/AFAetzARuD8olqvstQnS
v+xte7WBtuy/lB6qozn27L8MeCmJ86rrP7hq+zYFH+U/JwwXsg==
      "], 
      {Hue[0.6, 0.3, 0.85], EdgeForm[Hue[0.6, 0.3, 0.75]], 
       TagBox[Polygon3DBox[CompressedData["
1:eJxNkEsOwyAMRElIoKQk4RMO0E0O1CP0AO39d7Wlh8RiNIPtGQOvz+/9nY0x
t8AKkqAN+hKsgocgCJ7UPHWdVX+hr3OO/slMYG6BE54TvXJO1BqeXbCx72C3
ZkT6jpkL7wFbtPI0eAP+fr/u1R2ZXiHfco+JN6m/whHd31PI24bMTC1T92Tt
3MeR2+uNXiSvwjO6/1eFPdqTU4f/0vw/BKUHCg==
         "]],
        Annotation[#, "Geometry"]& ]}],
     MouseAppearanceTag["LinkHand"]],
    AllowKernelInitialization->False],
   "MeshGraphics3D",
   AutoDelete->True,
   Editable->False,
   Selectable->False],
  Boxed->False,
  DefaultBaseStyle->{
   "MeshGraphics3D", FrontEnd`GraphicsHighlightColor -> Hue[0.1, 1, 0.7]},
  Lighting->{{"Ambient", 
     GrayLevel[0.45]}, {"Directional", 
     GrayLevel[0.3], 
     ImageScaled[{2, 0, 2}]}, {"Directional", 
     GrayLevel[0.33], 
     ImageScaled[{2, 2, 2}]}, {"Directional", 
     GrayLevel[0.3], 
     ImageScaled[{0, 2, 2}]}},
  Method->{"ShrinkWrap" -> True},
  ViewPoint->{2.1044582312127735`, -2.2937679898342145`, -1.3266061819141006`},
  ViewVertical->{0.9731670905013122, -0.09850626776876714, 
   0.20794790014683606`}]], "Output",
 CellChangeTimes->{3.820503720244735*^9},
 CellLabel->
  "Out[322]=",ExpressionUUID->"18eb69d0-73b6-4d09-a30d-7586f9331414"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"0", 
  RowBox[{"h", "[", 
   RowBox[{
    RowBox[{"1", ";;", "1"}], ",", 
    RowBox[{"1", ";;", "3"}]}], "]"}]}]], "Input",
 CellLabel->
  "In[323]:=",ExpressionUUID->"8cec550c-96b4-4e06-9f11-aee452b27a34"],

Cell[BoxData["0"], "Output",
 CellChangeTimes->{3.82050392150014*^9},
 CellLabel->
  "Out[323]=",ExpressionUUID->"8f345eb6-8946-4d39-8366-06da0cf99f6c"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"v0h", "[", 
  RowBox[{"[", 
   RowBox[{"1", ";;", "3"}], "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.820503944995582*^9, 3.8205039928554277`*^9}, {
  3.820504084361032*^9, 3.820504088982834*^9}},
 CellLabel->
  "In[335]:=",ExpressionUUID->"797a321b-6cdd-4718-9c1e-e4939835fb49"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"0", ",", "0", ",", "0"}], "}"}]], "Output",
 CellChangeTimes->{{3.8205039330697927`*^9, 3.820503993081667*^9}, {
  3.8205040847398367`*^9, 3.8205040891187487`*^9}},
 CellLabel->
  "Out[335]=",ExpressionUUID->"4c42509a-5628-4160-b47e-779e1311f172"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["v0h"], "Input",
 CellLabel->
  "In[332]:=",ExpressionUUID->"d9edb4b5-9b83-40ef-8320-54b6d73694ac"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"0", ",", "0", ",", "0", ",", "0"}], "}"}]], "Output",
 CellChangeTimes->{3.820504060447165*^9},
 CellLabel->
  "Out[332]=",ExpressionUUID->"d36cf816-3145-4aa1-af8f-96736b032062"]
}, Open  ]]
},
WindowSize->{1869.75, 1038.75},
WindowMargins->{{0, -480}, {-270, 21}},
TaggingRules->{
 "WelcomeScreenSettings" -> {"FEStarting" -> False}, "TryRealOnly" -> False},
Magnification:>1.3 Inherited,
FrontEndVersion->"12.1 for Linux x86 (64-bit) (June 19, 2020)",
StyleDefinitions->"Default.nb",
ExpressionUUID->"f96ff665-777b-415d-b17d-1ec23f1ba816"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 12728, 356, 983, "Input",ExpressionUUID->"19ed53eb-667e-4297-9a38-e410cac1ad2b"],
Cell[13311, 380, 1498, 25, 32, "Message",ExpressionUUID->"2f26c32a-f341-45ea-b92f-60786a68c795"],
Cell[14812, 407, 1498, 25, 32, "Message",ExpressionUUID->"c113824b-c5a6-4d56-8789-e7fdf423ef6f"],
Cell[16313, 434, 1498, 25, 32, "Message",ExpressionUUID->"9d4a3a37-b45a-4db5-99de-98e54e0368e9"],
Cell[17814, 461, 1449, 24, 30, "Message",ExpressionUUID->"a3827fe1-6c3f-4df7-9bb9-4dc9a234a4b4"],
Cell[19266, 487, 86352, 1403, 501, "Output",ExpressionUUID->"9f058645-cd48-4029-acb3-ae1d47c32b1f"]
}, Open  ]],
Cell[CellGroupData[{
Cell[105655, 1895, 386, 11, 37, "Input",ExpressionUUID->"cd4faee0-9c85-4423-932a-db09f2746a8e"],
Cell[106044, 1908, 8257, 220, 280, "Output",ExpressionUUID->"791f0a7e-e758-4775-84cf-da40126ee2a3"]
}, Open  ]],
Cell[CellGroupData[{
Cell[114338, 2133, 486, 14, 65, "Input",ExpressionUUID->"f0baaa9c-db48-4070-9d2d-2c58d817d9f7"],
Cell[114827, 2149, 3983, 79, 486, "Output",ExpressionUUID->"18eb69d0-73b6-4d09-a30d-7586f9331414"]
}, Open  ]],
Cell[CellGroupData[{
Cell[118847, 2233, 231, 7, 37, "Input",ExpressionUUID->"8cec550c-96b4-4e06-9f11-aee452b27a34"],
Cell[119081, 2242, 152, 3, 43, "Output",ExpressionUUID->"8f345eb6-8946-4d39-8366-06da0cf99f6c"]
}, Open  ]],
Cell[CellGroupData[{
Cell[119270, 2250, 304, 7, 37, "Input",ExpressionUUID->"797a321b-6cdd-4718-9c1e-e4939835fb49"],
Cell[119577, 2259, 287, 6, 43, "Output",ExpressionUUID->"4c42509a-5628-4160-b47e-779e1311f172"]
}, Open  ]],
Cell[CellGroupData[{
Cell[119901, 2270, 112, 2, 37, "Input",ExpressionUUID->"d9edb4b5-9b83-40ef-8320-54b6d73694ac"],
Cell[120016, 2274, 218, 5, 43, "Output",ExpressionUUID->"d36cf816-3145-4aa1-af8f-96736b032062"]
}, Open  ]]
}
]
*)

